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Evadez-vous d'un monde trop sage. Aux commandes de votre micro, explo- 
rez le temps et l'espace, combattez les monstres, délivrez la belle princesse, 
emparez-vous de trésors conquis au péril de votre vie, mesurez-vous, matière grise. 
contre silicium, à un adversaire impitoyable. 

Le catalogue No Man's Land est votre passeport pour l'évasion. 

Aventure, stratégie, réflexion, réflexes, action, simulation, vous y trouverez 
tous les types de jeux, pour la plupart des marques d'ordinateur. 

Des jeux sélectionnés pour leur qualité, dont plus de la moitié sont tout nou- 
veaux, des best-sellers en puissance. 

Classés par type et par zone de prix, tous les jeux sont décrits un par un avec 
leurs caractéristiques. Des logiciels utilitaires, pour l'aide à la programmation ou à 
la gestion complëtent le tableau. 

Avec ses 400 logiciels distribués par plus de 300 revendeurs, le catalogue 
No Man's Land est unique en France. Demandez-le vite à votre revendeur habituel 
et rêvez... Vente exclusivement aux revendeurs. 
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UNE ECONOMIE ОЕ 


35' 


et notre cadeau de bienvenue 


“JEUK EN TETE" 


à compléter et à nous retourner dès aujourd'hui. 


OUI, je désire m'abonner à TILT pour 1 an (10 numé- 
ros) au prix de 130 F au lieu de 165 F. J'économise ainsi 
35 Е sur le prix au numéro 


D Je joins mon réglement (chèque ou mandat à l'ordre de 
TILT) et recevrai gratuitement en cadeau, le hors série de 
TILT: "JEUX EN TETE". 

(Détachez cette carte et envoyez-la sous enveloppe avec 
votre réglement à TILT Service Abonnement: 

101, rue Réaumur - 75002 Paris) 


D. Je préfère vous payer plus tard, sur facture. Mais, dans 
се cas, je ne recevrai pas mon cadeau "JEUX EN ТЕТЕ" 


Nom 


maaa 


Mho 
QUEZ N OA 


ous êtes patient ? Tant mieux ! Ce numéro 
hors série de Tilt va mettre vos nerfs à rude 
épreuve ! Avec, pour la première fois , 80 


w s en kit, prêts à 
onctionner une fois digérés par votre ordi- 


nateur. Au rendez-vous : duels spaciaux, 

courses automobiles, vols en rase-mottes, 

missions impossibles, tirs aux pigeons, 

guerres modernes, labyrinthes etc. Un 

vaste programme ! Mais avant de savourer votre ré- 

compense, il faudra introduire méticuleusement cha- 

que programme dans votre micro (attention, la moin- 

dre faute vous obligera... à tout recommencer !). Et 

puisqu'il n'existe pas encore un Basic standard, nous 

publions dans les premiéres pages de ce guide (juste 

avant les programmes) 

qui vous permettront d'introduire également les 

jeux qui n'ont pas été écrits dans le langage de votre 

ordinateur. Enfin, si vous n'avez pas encore choisi l'ap- 

pareil de vos réves, nous avons soumis à notre banc 

d'essai impitoyable 

т) А vous де jouer.Tournez cette page ettrans- 

ormez vite nos colonnes de lettres et de chiffres en rêve 
électronique. 


Bruno Barbier 


FINISLES MERC 


une gamme de jeux vidéo révolutionnaires, qui permet avec une cartouche 

à double entrée, de jouer avec deux jeux passionnants, totalement différents et indépendants : 

- une ascension glaciale avec Spike's Peak? et des frissons de terreur avec Ghost Manor? 

- en plein dans le mille avec Artillery Duel? et une lutte sans merci avec Super-Kung-Fuj 

- un duel à mort entre Sir Lancelot^ et le Dragon et l'enlèvement spectaculaire de Lady Marianne 
par Robin des Bois (Robin Hood)? 


des jeux vidéo, qui aprés avoir été joués des millions de fois dans les bars et les salles de 
jeux américains, arrivent en France et vont triompher chez vous : 
- Congo Bongo'"': un jeu d'aventure à mourir de rire! Déjà un trés grand hit aux Etats-Unis. 
- Buck Rogers™: un jeu de stratégie et de combat qui évoque le personnage bien connu des bandes 
dessinées américaines. 
- Star Trek™ : un jeu de stratégie spatiale avec une boussole de tir à placer sur le joystick pour mieux 
contróler le combat. 


Les jeux vidéo Double-Ender™ sont compatibles avec Atari? 2600 VCS™ CBS Coleco Vision" et bientôt avec d'autres standards. 
Les jeux vidéo Sega? sont compatibles avec les standards : Atari? 2600 VCS™ 400,74 8007" 1200 XL!" et pour Congo Bongo": Mattel Intellivison® 
Bientót dans la plupart des magasins de jeux vidéo et les vidéo-clubs. 


JEUX VIDEO 


REGIE CASSETTE VIDEO 


LE BASIC SANS PEINE 


Alice est un micro-ordinateur conduit 
en France par Matra-Hachette sous 
licence américaine. Ses capacités le 
destinent à l'initiation des débutants 
désireux de découvrir l'informatique 
et le langage basic. Mais Alice n'est 
pas irréprochable, les néophytes l'ap- 
prendront parfois à leurs dépens... 


Vous reconnaîtrez ce micro-ordinateur à 
sa couleur rouge et à sa petite taille. Il 
est compact et possède un clavier fonc- 
tionnel et complet. La structure des tou- 
ches, loin d'étre désagréable, n'autorise 
pas une frappe rapide. A/ice est doté 
d'une prise péritélévision pour la connec- 
tion au téléviseur. L'image ainsi produite, 
est claire et les couleurs se distinguent 
bien sur l'écran. L'alimentation secteur 
est extérieure. Actuellement, aucune 
extension signée Matra-Hachette n'est 
disponible pour А//се. Heureusement, 
toutes les extensions destinées à son 
homologue, le MC 10 de Tandy, lui sont 
entierement compatibles. 

Son basic micosoft résident est muni 
d'une mémoire vive de 4 Ko. Il offrira 
aux débutants de multiples possibilités 
de programmation, mais conviendra dif- 
ficilement à un programmeur initié. Neuf 
couleurs (jaune, rouge, ivoire, bleu 
cobalt, bleu pále, mauve, orange, vert 
et noir) et seize caractéres semi- 
graphiques pré-établis sont directement 
accessibles au clavier. lls permettront la 
réalisation de graphismes simples et con- 
tribueront à la création de dessins ou à 
la conception de logiciels ludiques. 

La définition graphique est de 64 x 32 
zones pour la version de base. Bientót, 
Alice accèdera à la haute résolution 
gráce à l'extension 16 Ko, fabriquée par 
Matra-Hachette. Il est possible et même 
conseillé d'utiliser graphisme et textes à 
la fois, pour obtenir des réalisations 
beaucoup plus attrayantes. Malheureu- 
sement, l'absence d'un éditeur de tex- 
tes ne permet pas une correction aisée 


Nous avons aimé : 

— ses dimensions ; 

— son manuel, très clair; 

— la qualité de l'image ; 

— son clavier facile à utiliser. 

Nous avons regretté : 

— son rapport qualité-prix ; 

— l'absence d'éditeur de 
programmes ; 

— l'alimentation extérieure ; 


ALICE 


des erreurs pouvant apparaitre au cours 
de l'élaboration d'un programme. L'ins- 
truction «Sound» émettra des sons 
modulables sur une gamme assez res- 
treinte; ceux-ci sont transmis par le 
haut-parleur TV. Bien sûr, les sons ainsi 
produits, bien que de bonne qualité, ne 
peuvent étre comparés à ceux d'un 
synthétiseur musical. 
La lecture et la sauvegarde sur cassette 
ne pose pas un réel probléme. Mais 
attention, le cordon magnétophone n'est 
pas fourni avec l'ordinateur. Aprés pres- 
que un an de commercialisation, Matra- 
achette ne propose que deux casset- 
tes de jeux. La premiére est constituée 
de logiciels en basic d'un niveau moyen. 
La seconde, présentant des jeux en 
assembleur, est bien meilleure. Mais 
vous pourrez utiliser les logiciels créés 
par Tandy. lls sont tous entièrement 
compatibles avec l'ordinateur francais. 
Alice. 


RADIOSCOPIE 
Origine : France 
Connection TV : 

* péritel 
RAM: 4 Ko 
Son: oui 
Couleur: 8 
Joystick : non 
Entrée cartouche : non 
Crayon optique: non 
Disquette : non 
Ludothéque: x 
Prix: 1 150 F environ 


Puissance 4 


Tic Tac Toc 


Jack Pot 


UNE SOLIDE REPUTATION 


Tandy, ce géant de la micro- 
informatique et de l'électronique de 
loisir, s'est lancé à l'assaut d'un nou- 
veau marché, celui des petits micros 
avec couleurs, sons et caractères 
semi-graphiques à moindre prix. Sa 
vocation ? Faire découvrir l'informati- 


que à un large public. 


Tandy avait su apporter un « plus » avec 
la sortie du TRS 80 modèle 1, il y a cinq 
ans. Le MC 10, lui, ne révolutionnera pas 
la micro-informatique, mais la solide 
réputation de ce constructeur donnera 
le coup de pouce nécessaire à sa 
commercialisation. 

La connection du MC 70, au téléviseur 
s'établit par l'intermédiaire de la prise 
péritélévision. Le MC 10 fonctionne en 
systeme Sécam et il n'est donc plus 
nécessaire de recourir à un téléviseur 
multistandard Pal/Sécam. L'image est 
d'excellente qualité. Ce nouveau micro- 
ordinateur, d'une taille beaucoup moins 
importante que ses prédécesseurs, est 
une machine robuste, dotée d'un clavier 
classique, à base de gris et noir, comme 
le reste de l'ordinateur. Si sa petite taille 
n'a pas permis d'intégrer l'alimentation 
secteur, le MC 10 dispose de toutes les. 
extensions du micro-ordinateur Alice. 
Le MC 10 pourtant destiné à l'initiation, 
posséde un langage basic résident assez 
restreint, et l'absence d'un éditeur de 
textes ne facilitera pas, paradoxalement, 


L'Attrape 


Réflexes 


la tâche des débutants. Le langage rési- 
dent, le basic microsoft, est doté de tous 
les ordres classiques. Ces derniers, rien 
d'exceptionnel, sont presque tous acces- 
sibles directement au clavier par l'inter- 
médiaire de la touche < Control ». Ah, si 
seulement Tandy avait pensé à une fonc- 
tion d'édition ! La création de logiciels 
aurait été grandement facilitée. Malheu- 
reusement, à la moindre erreur, vous 
serez dans l'obligation de retaper la ligne 
en entier. L'initiation à l'informatique se 
trouve facilitée par un manuel en fran- 
cais fort bien réalisé. 

La mémoire vive de 4 kilo-octets devient 
rapidement insuffisante pour créer des 
jeux. En mode graphique, vous disposez 
d'un écran divisé par 64 x 32 zones, soit 
2048 blocs, en neuf couleurs. Les seize 
caractères semi-graphiques faciliteront la 
réalisation de dessins et d'animations. 


Nous avons aimé : 

— l'effort fait pour l'initiation au 
basic ; 

— ses nombreuses extensions ; 

— sa finition; 

— son utilisation simple et fiable. 

Nous avons regretté : 

— l'absence d'un joystick ; 

— la faible capacité de base ; 

— le basic peu souple pour 
débuter ; 

— sa ludothèque encore inexis- 
tante aprés un an de commer- 
cialisation. 


RADIOSCOPIE 
Origine: Etats Unis 
Connection TV : 

* péritel 
RAM: 4 Ko 
Son: oui 
Couleur: 8 
Joystick : non 
Entrée cartouche : non 
Crayon optique : non 
Disquette : non 
Ludothèque: * 
Prix: 1 150 F environ 


Des sons peuvent étre produits en défi- 
nissant le ton et la durée de la note trans- 
mise au haut-parleur du téléviseur. Une 
excellente qualité sonore pour un micro, 
surtout dans cette gamme de prix. 

Un an après sa sortie, la ludothèque du 
MC 10 ne s'est pas beaucoup étoffée ; 
pas plus de cinq programmes de jeux ne 
sont aujourd'hui disponibles. Ces logi- 
ciels réalisés aux Etats-Unis ne sont pas 
traduits. Mais vous pourrez utiliser les. 
programmes en basic et assembleur con- 
cus par Matra-Hachette, et fonctionnant 
sur le micro-ordinateur A/ice. En effet, 
les deux ordinateurs, quasiment identi- 
ques, donnent lieu à des échanges stan- 
dard d'extensions et de logiciels. Le seul 
espoir de voir apparaitre des logiciels 
pour le MC 10 et Alice, réside dans la 
prochaine commercialisation d'ouvrages 
de programmes aux Editions Edimicro, 
Sybex, P.S.I.... 


ATARI 400-800 


LA PASSION DU JEU 


Les deux frères Atari, le 400 et le 800, 
sont sensiblement différents, même 
s'ils possèdent tous les deux la même 
passion du jeu. Le 800 est un vérita- 
ble ordinateur, doté d'une mémoire 
centrale de 16 K extensible à 48 K et 
d'un clavier de type machine à écrire 
avec minuscules, auto-répétition et 
une touche d'inversion vidéo. 


Le boitier, fourni avec une prise péritel, 
est muni de deux emplacements, desti- 
nés au branchement des cartouches de 
mémoire ROM, et de quatre connecteurs 
pour les manettes de jeux. La qualité du 
graphisme est satisfaisante, mais les 
couleurs sont trop lumineuses. La haute 
définition est possible et atteint 
320 x 192 points, mais n'est opération- 
nelle qu'avec une seule couleur. D'autre 
part, la qualité des graphiques s'affaiblit 
en fonction du nombre de couleurs uti- 
lisé. En revanche, l'Atari 800 possède 
d'honnétes possibilités sonores. Le son 
est programmable sur quatre voies indé- 
pendantes en volume et en timbre. Parmi 
les périphériques, nombreux mais chers, 
on notera le lecteur de disquettes, qui 
n'existe pas sur le 400. 

La console de jeux Atari 400 est aussi un 
ordinateur d'initiation. Son clavier à 
membrane (sans relief) est peu pratique. 
Il offre une mémoire vive de 16 K, dis- 
pose de 8 couleurs avec prise péritel 
Secam, et permet d'afficher 24 lignes de 
40 colonnes. ІІ possède également un 
synthétiseur constitué de quatre géné- 
rateurs de sons sur quatre octaves. La 
programmation en basic de la tonalité, 
la durée et la distribution des sons reste 
trés simple. ІІ faut cependant utiliser 
l'assembleur pour modifier l'enveloppe. 


RADIOSCOPIE 


Etats-Unis 
Connection TV : péritel 
Mémoire vive: 16K 
Couleur: 8 (Sécam) 
Son: oui 

Joystick : oui 

Entrée cartouche : oui 
Crayon optique : oui 
Disquette : non 
Ludothèque: x x x ж ж 
Prix : 3000 F environ 


aussi des simulations et des wargames. 
De quoi passer des heures aux comman- 
des de sa machine, et attraper de fort 
belles crampes. Les joysticks et manet- 
tes manquent, en effet, de maniabilité et 
de souplesse. 


RADIOSCOPIE 
800 


ie : Etats-Unis 
Connection TV : péritel 
Mémoire vive: 16K 
Couleur: 16 (Sécam) 
Son: oui 

Joystick : oui 

Crayon optique : oui 
Disquette : non 
Ludothèque: x x x x ж 
Prix : 6500 F environ 


Nous avons aimé : 

— leur ludothèque variée ; 

— leur connection cartouche. 
Nous avons regretté : 

— leur rapport qualité-prix ; 

— leurs joysticks, peu souples. 


Les deux Atari 400 et 800 souffrent d'un 
défaut commun, leur prix, qui demeure 
élevé, et sont logiquement détrônés par 
la nouvelle gamme de modèle « XL ». Ils 
possèdent également, au-delà de leurs 
différences, le même atout : c'est-à-dire 
qu'ils profitent d'une bibliothèque de 
logiciels impressionnante. Tous les 
grands jeux d'arcades sont disponibles 
(oserais-je citer Pac-Man, le vrai...), mais 
10 


Saut de haies 


NN 


ATARI 600 XL - 800 XL 


LE MONDE EN COULEUR 


Le changement de la gamme Atari 
saute aux yeux. Les 400/800 étaient 
plutôt austéres et volumineux. Le 
600 XL et le 800 XL sont au contraire 


habillés d'une robe très design, ce qui 
les rend très agréables à l'œil, 
d'autant que leur taille a diminuée par 
rapport à leurs prédécesseurs. Le look 
des périphériques a, lui aussi évolué, 
et ceux-ci peuvent désormais s'empi- 
ler plus facilement. Plus d'excuse si 
votre installation ressemble à un 
champ de bataille ! 


Les anciens 400 et 800 avaient de réel- 
les possibilités, particulièrement en gra- 
phique. Les nouveaux venus conservent 
l'organisation interne de leurs ainés avec 
quelques nouveautés cependant. La tou- 
che « Help », sert à revenir sur les diffé- 
rents «menus» dans des logiciels 
complexes, et permet de conserver en 
mémoire le manuel d'utilisation du DOS. 
Cóté périphériques, le magnétophone 
1010 est doté désormais de deux prises 
entrée-sortie au lieu d'une seule sur le 
410. Le lecteur de disquettes a, quant à 
lui, un nouveau système de fermeture. 
Le 600 XL, tout comme le 800 XL, se 
branche sur le téléviseur soit par la prise 
antenne UHF, soit par la prise péritel. 
Dans ce dernier cas, on profite des cir- 
cuits mis au point par Atari, en accédant 
aux 256 couleurs (!). Les branchements 
sont simples et fiables, et permettent de 
connecter de nombreuses extensions. 


Girobattle 


Chasseur 


RADIOSCOPIE 
Atari 600 XL 
Origine : Etats-Unis 
Connection TV : péritel 
Mémoire vive: 16 K 
Couleur: 256 
Son: oui 
Joystick : oui 
Crayon optique : oui 
Disquette : non 
Ludothèque: x x ж x ж 
Prix : 2500 F environ (Sécam) 


Nous avons aimé: 

— leur ludothèque ; 

— le graphisme et les couleurs; 

— la facilité d'initiation au basic. 

Nous avons regretté: 

— leur prix, assez élevé ; 

— l'absence de réelle nouveauté 
technique. 


Remarquons, tout particuliérement, le 
lecteur de cassettes qui offre la possibi- 
lité d'enregistrer sur une piste sonore des 
commentaires — comme par exemple la 
régle d'un jeu — ou de la musique qui 
se déclenche au moment du chargement 
du programme. 

La qualité graphique est extraordinaire 
avec la haute résolution 320 x 192 points 
et surtout les 256 couleurs, gráce aux- 
quelles Atari surpasse tous ses concur- 
rents. Cóté son, la nouvelle gamme 
hérite des synthétiseurs connus sur les 


RADIOSCOPIE 
Atari 800 XL 
Origine: Etats-Unis 
Connection TV : péritel 
Mémoire vive: 16 K 
Couleur: 256 
Son: oui 
Joystick : oui 
Crayon optique : oui 
Disquette : oui 
Ludothèque: x x ж x ж 
Prix : 3 500 F environ (Secam) 


modèles 400/800. Et ceux qui voudront 
découvrir les délices de la ргодгатта- 
tion auront à leur disposition un manuel 
de basic. 

Côté jeux, c'est le vertige. Le cap des 
1000 logiciels est en train d'être 
dépassé! Bien sûr, tous les modèles 
Atari sont compatibles entre eux. Désor- 
mais, grâce à Nathan et Hachette, on 
peut s'instruire en s'amusant, avec des 
jeux éducatifs, qui abordent le calcul, 
l'orthographe et l'éveil. Et à l'heure de 
la récréation, on pourra expérimenter les 
nouveaux jeux d'action comme Pôle 
Position ou Moon Patrol. Avec leur 
forme séduisante, les nouveaux 600 XL 
et 800 XL sont à la fois d'intéressants 
ordinateurs d'initiation et des consoles 
de jeux aux larges possibilités. La docu- 
mentation technique, en francais, 
gagnerait, cependant, à s'étoffer. 


Le BBC est disponible sur le marché 
français depuis moins d'un an. Il a été 
conçu et développé par la firme 
Acorn Computers Limited de Cam- 
bridge, sous l'égide de la BBC, d'où 
son nom. 


Le boîtier du BBC est de grande dimen- 
sion mais d'esthétique quelconque. 
L'installation de l'appareil est très facile, 
d'autant que le BBC dispose d'une ali- 
mentation intégrée. L'image obtenue est 
nette et les couleurs saturées. Vous pou- 
vez relier le BBC à un amplificateur exté- 
rieur, à la grande joie de vos voisins bien 
sür. Le BBC dispose d'une vaste gamme 
d'extensions: extension mémoire de 
64 K, lecteurs de cassettes et de disquet- 
tes et même un synthétiseur de paroles, 
en francais! Les manettes de jeu se 
branchent simultanément sur une prise 
située à l'arriére. Elles doivent obligatoi- 
rement étre tenues dans la main ; leur 
usage est agréable et n'entraine pas de 
fatigue excessive. Toutefois, les petites 
mains seront certainement désavanta- 
gées. 


Nous avons aimé: 

— ва vitesse de traitement ; 

— ses possibilités sonores 
et graphiques ; 

— le langage assembleur 
intégré ; 

— les nombreuses interfaces 
incluses dans le boîtier. 

Nous avons regretté : 

— son rapport qualité-prix ; 

— sa taille importante ; 

— ses manettes de jeu peu 
maniables ; 

— sa ludothèque assez pauvre. 


Le Basic intégré est de type microsoft, 
mais l'appareil dispose aussi d'un assem- 
bleur incorporé. Ce basic est d'ailleurs le 
plus rapide de ceux que nous connais- 
sons, dans cette gamme de prix, bien 
sûr. Le BBC possède une gamme de huit 
couleurs et d'une définition graphique 
étonnante: 640 х 256 pixels. Mais, à 
cette définition là, seules deux couleurs 
sont accessibles. Sept modes différents 
permettent de choisir un compromis 
entre définition et nombre de couleurs 
disponibles. Même avec huit couleurs 
à l'écran, la définition atteint encore 
160 x 256 pixels. 

Différentes fonctions gèrent cette haute 
résolution : « Move » positionne le cur- 
12 


MONTEZ LE SON! 


seur graphique : « Draw » trace une ligne 
entre la dernière position du-dit curseur 
et un point spécifié: «Plot» est trés 
complet et permet de tracer un point ou 
une droite en coordonnées absolues ou 
relatives ou un triangle colorié. « Vdu » 
autorise de nombreuses possibilités, en 
particulier la définition de caractères et 
le mélange de texte et de graphique. |! 
manque malgré tout une instruction, 
permettant le dessin direct de cercles. 
Deux instructions sont dévolues au son : 
« Sound » contrôle trois canaux de notes 
et un canal de bruit. Pour chaque canal, 
on peut spécifier, synchronisation, 
amplitude, fréquence et durée. « Enve- 
loppe » assure le contrôle de l'enveloppe 
(l'enveloppe est ce qui permet de carac- 
tériser le timbre de chaque instrument). 
Ces deux fonctions, bien que de pro- 
grammation ardue, autorisent des effets 
sonores de grande qualité. 

La gamme de logiciels commence à étre 
suffisamment étoffée. Elle comprend des 
jeux de réflexion (Echecs, Othello) de 
simulation (de vol), d'aventures graphi- 
ques et conversationnels et toute une 
gamme de jeux d'arcades. Le BBC appa- 
rait finalement comme un micro- 
ordinateur aux possibilités intéressantes, 
tant graphiques que sonores. 


RADIOSCOPIE 
Origine: Grande-Bretagne 
Connection ТУ: 

* péritel ou pal antenne UHF 
RAM: 32 Ko 
Son: oui 
Couleur: 8 
Joystick : oui (2) 
Entrée cartouche : oui 
Crayon optique : oui 
Disquette : oui 
Ludothèque: x x ж 
Prix : 7 500 F environ 


Puissance 4 


Mille-pattes 


Smokkar 


Les chenilles 


ELECTRON 


PROGRAMMER, C’EST FACILE 


L'Electron Acorn, nouveau venu dans 


Nous avons aimé: 
— son puissant basic ; 

— sa capacité mémoire vive ; 
— ses possibilités graphiques ; 
sa facilité d'utilisation. 


le monde de la micro-informatique, 
est issu d'un modèle beaucoup plus 
puissant, le BBC modèle B, dont il 
reprend toutes les caractéristiques 
essentielles du langage basic. En 
France, le premier modèle de la 
gamme ne connut pas un vif succès. 
C'est dommage, car il s'agit d'un 
micro-ordinateur assez exceptionnel 
compte tenu de son prix. Cependant, 
dans le marché aujourd'hui trës 
encombré de l'ordinateur, l'Electron 
conserve toutes ses chances de sor- 
tir du rang et de bénéficier des suffra- 
ges du public. 


A première vue, l'appareil n'a rien 
d'exceptionnel et pourtant son boitier 
crème, recèle d'immenses ressources. 
Un petit quadrillage facon cahier d'éco- 
lier, situé au-dessus du clavier, annonce 
déjà sa vocation d'initiation à l'informa- 
tique. Les branchements sont trés sim- 
ples à réaliser, à condition de posséder 
un adaptateur secteur. L'image produite 
avec la prise péritel est excellente. 
Sachez seulement que, prise péritel et 
cordon magnéto, ne seront pas livrés 
avec la machine et devront étre factu- 


un logiciel gratuit 
pour tout achat 


VIDEO-SHOP 


50, rue de Richelieu - 75001 PARIS - Tél: 296.93.95 du lundi au samedi, de 9 h 30 à 19 h. 


Nous avons regretté : 

— la compatibilité incertaine des 
logiciels du ВВС; 

— l'absence de cordons magné- 
tophone et prise péritel ; 

— la pauvreté des possibilités 
sonores ; 

— les manettes de jeux disponi- 
bles qu'avec une extension. 


rés en supplément. Quant au charge- 
ment des cassettes, il est extrêmement 
fiable. De nombreuses extensions res- 
tent à venir qui transformeront votre 
Electron en un second BBC, une chance 
non? 

Son basic résident, comme sa mémoire 
vive de 32 Ko, sont identiques au micro- 
ordinateur BBC. Programmer l'Electron 
est un véritable plaisir, car son basic, trés 
rapide, est surtout extrêmement complet 
et varié. Bien sür, toutes les fonctions 
classiques y figurent, auxquelles s'ajou- 
tent de multiples ordres. Par exemple, 
« Old » permet de récupérer un pro- 
gramme aprés un « New » accidentel. 
Cóté graphisme, l'utilisateur a le choix 
entre sept modes différents. Malheureu- 
sement, chacun d'eux est plus ou moins 
gourmand en mémoire vive, entre 8 et 
24 Ko. La résolution graphique maximale 


PROMOTION 
SPECIALE 
MICRO-EXPO 84 


m THOMSON T07 

m SINCLAIR 

m ORIC-ATMOS 

W ATARI 600 ET 800 XL 
m COMMODORE 

m SPECTRA VIDEO 


est de 640 points, mais vous ne dispo- 
sez que de deux couleurs et vous per- 
drez 20 Ko RAM. Des petits caractères 
graphiques peuvent étre redéfinis sur 
une matrice 8 x 8 points. lls seront par- 
ticulièrement utiles pour la réalisation de 
jeux en basic. L'E/ectron possède un 
petit haut-parleur intégré commandé par 
un seul canal. Les effets produits ne sont 
pas exceptionnels, mais animeront vos 
logiciels. Le manuel d'utilisation est trés. 
clair, et plus de la moitié de celui-ci vous 
enseignera comment utiliser l'assem- 
bleur. Il s'agit du premier manuel inclus 
avec la machine oü l'assembleur n'est 
pas passé sous licence. 

Du fait de sa jeunesse, l'£/ectron ne pro- 
pose pas encore de logiciels ludiques. 
Mais rassurez-vous, ils ne vont pas tar- 
der à apparaitre sur le marché. Pour les 
joueurs impatients, certains logiciels du 
BBC modéle B sont compatibles avec 
l'Electron . De là, à connaître le nombre 
exact de logiciels fonctionnant sur ces 
deux micro-ordinateurs... Ici, une seule 
solution pour en avoir le cœur net, 
essayez l'échange standard, succès non 
garanti... 


RADIOSCOPIE 
Origine : Grande-Bretagne 
Connection TV : 

* péritel 

* UHF antenne pal 
ВАМ: 32 Ko 
Son: oui 
Couleur: 16 
Joystick: oui 
Entrée cartouche : non 
Crayon optique : oui 
Disquette : oui 
Ludothèque: x x * 
Prix : 3 200 F environ 


Je désire recevoir gratuitement votre 
documentation et vos prix sur (précisez 
кісі le matériel) : 


NOM 
PRENOM 
ADRESSE 
VILLE 
CODE POSTAL 


Je joins 2 timbres à 2 F pour frais d'envoi 


Enfin champion 
avec le boss 
d'Amérique 


JB INDUSTRIES FRANCE 
Importateur et distributeur exclusif 

pour la France 2 
20 біз, Chemin des Grands-Plans -ES SALLES DE JEUX 


06802 Cagnes-sur-Mer 
Tél.: (93) 20.17.17 - Télex: 461387 F ET MAINTENANT CHEZ VOUS 


Vampires 


|fLICO BLANC... ` eener OU MIR 


Shadow 


COMMODORE 64 


Pas de doute, le Commodore 64 ne 
renie pas son lien de parenté avec le 
МІС 20. Même aspect extérieur, 
même présentation sobre avec ses 
trois bruns dégradés jusqu'au sépia. 
Mais qu'on ne s'y trompe pas, le CBM 
64 n'est pas simplement un VIC 20 
«gonflé ». С” est dans sa conception, 
un nouvel ordinateur. 


L'interface Secam incorporée à l'appa- 
reil évite de nombreux branchements. 
On trouve par ailleurs une interface Cgv 
qui permet d'obtenir une excellente 
image Secam sur un Commodore Pal. 
On regrettera en revanche l'alimentation 
par un bloc secteur extérieur. Un bon 
point pour le clavier, à 66 touches com- 
pactes. ІІ comprend une série de carac- 
tères semi-graphiques et quatre touches 
programmables de fonctions, surtout 
utiles pour les jeux. Attention! Toute 
interruption du CBM est déconseillée 
sous peine de perdre les programmes. 
Ne pas hésiter à recourir à des sauvegar- 
des fréquentes. 


Nous avons aimé : 

— son joystick ; 

— sa ludothèque 

— son entrée cartouche ; 

Nous avons regretté : 

— la génération de son et de gra- 
phisme par « Poke » 

— le manque de fonctions 
prédéfinies ; 


Côté graphisme, le Commodore 64 offre 
des qualités exceptionnelles, compara- 
bles à celles de certains jeux d'arcades. 
Le sprite est sa botte secréte. Les spri: 
tes — dessins définis par des cases noi- 
res ou blanches sur une grille de 21 par 
24 cases, chaque case noire correspon- 
dant à un point — permettent de géné- 
rer des graphiques. lls sont au nombre 
de 164 et vous pourrez en utiliser 8 à la 
fois, en les promenant sur l'écran en les 


BON PRIX, BON OEIL 


faisant apparaître ou disparaître, se tra- 
verser les uns les autres. Les créateurs 
de jeux s'en donneront à cceur joie, à 
condition d'être courageux : la généra- 
tion du graphique demande en effet, une 
quantité impressionnante de « Poke ». 
Mais quel résultat, avec une haute réso- 
lution de 320 x 200 points ! 

Пеп va de méme avec la création sonore, 
peu avare de « Peek ». Mais le résultat 
est parfait. On peut régler modulation, 
note, volume et enveloppe, gráce à un 
véritable synthétiseur à trois voix de huit 
octaves, et connectable sur une chaîne 
hi-fi. 

Les extensions sont dignes d'un maté- 
riel semi-professionnel : lecteur de cas- 
settes, de disquettes, imprimante, 
crayon optique, et pour le jeu, boutons 
rotatifs et poignées. Celles-ci sont un 
peu rigides, mais utilisables par les gau- 
chers. Les jeux disponibles sont nom- 
breux et variés, certains dotés d'un gra- 
phisme à faire pâlir d'envie plus d'un 
concurrent ! On en trouvera des surpre- 
nants, comme World Rise, Motor 
Mania, Monopoly, Jump Man, Camels 
ou Benjy. Grâce à un émulateur, les pro- 
grammes destinés au V/C 20 sont éga- 
lement utilisables sur le CBM 64, ce qui 
élargit considérablement sa ludothèque. 
Le Commodore 64 est un « gros » micro- 
ordinateur, dont la qualité du graphisme 
surprendra. En revanche, sa complexité 
d'utilisation risque de rebuter le program- 
meur débutant. 


RADIOSCOPIE 
Origine : Etats-Unis 
Connection TV : 

* péritel 
Mémoire vive : 64 K 
Couleur: 16 
Son: oui 
Joystick : 2 
Entrée cartouche : oui 
Crayon optique: oui 
Disquette : oui 
Ludothèque: x x * x x 
Prix: 3800 F environ (Sécam) 


EXCLUSIF 


Signé de reconnaissance de tous les branchés des jeux 
électroniques. Voici le TILT-SHIRT. 

Soigneusement confectionné en pur coton interlock, 
c'est un produit "Made in France", il n'est pas en vente 


Ni s alors commandez-le vite. Prix : 40 F. 
mm ыш шш = = 


BON DE COMMANDE 
TILT-SHIRT 


A remplir et renvoyer accompagné de votre règlement à 
TILT 2 rue des Italiens 75009 Paris 


Taille Quantité Prix Total 
Nm Е 


Participation aux frais d'envoi + 8,50 F 


TOTAL GENERAL ... 


40/42 


Nom 
Prénom 
I N°. Rue 


Ville 


I Ci-joint mon rëglement par 
O Chèque bancaire ÛJ C.C.P. à l'ordre de TILT 


ln 


I 
I 
I 
Code postal I 
I 
I 


° 
2 
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LE CREATEUR D'IMAGES 


DAI. Un drôle de nom pour ип ordi- 
nateur. Belge de surcroît. Le DAI est 
un «haut de gamme» tout à fait 
sérieux, concurrent de l'Apple ІІ, mais 
qui est assez peu répandu en France. 
Sa couleur blanche et sa finesse, son 
design original font un peu oublier 
son encombrement assez important. 


Le clavier Qwerty est homogène et per- 
met une frappe idéale. Pas de surprise 
côté raccordement, le DA/ fonctionne 
aussi bien sur téléviseur Pal que Secam, 
par l'intermédiaire d'une prise péritel. 
L'image est parfaite. Son microproces- 
seur 8080 accéde à un basic semi- 
compilé dont la vitesse écrase celle de 
tous ses concurrents. Le graphisme et 
le son constituent ses autres points forts. 
Le DAI est un créateur d'images. Le logi- 
ciel de création graphique CL/O réjouira 
les programmeurs de jeux. Gráce à ce 
programme, vous pourrez visualiser vos 
plus folles idées. Huit modes graphi- 


DAI 


ques sont possibles avec, en trés haute 
résolution (accessible par logiciel) 
244 x 528 points, et 16 couleurs. En ver- 
Sion de base, il offre déjà une définition 
de 336 x 256 points. Le changement des 


Nous avons aimé : 

— ses qualités graphiques et 
sonores ; 

— sa fiabilité ; 

— son programme CL/O ; 

Nous avons regretté : 

— son encombrement ; 

— son joystick trop sensible. 


couleurs est instantané, gráce aux ins- 
tructions « Colorg » et « Colort». Ses 
qualités sonores sont également impres- 
Sionnantes. ll dispose d'un synthétiseur 
vocal et musical à trois générateurs indé- 
pendants, dont un générateur de bruits 
blancs, qui permet la production d'ultra- 
sons. Pour couronner le tout, le DA/ 
peut se brancher sur une chaine hi-fi. 
Cóté extension, tout est là. Lecteur de 


RECORD: O 


Saut en longueur 


APPLE, ATARI ou COMMODORE... 


(I, lle, +) 


Logiciels de jeux sur disquettes 
En vente chez votrerevendeur Micro Informatique 


(600/800XL) 


HARD НАТ MACK. 


(c64) 


AXIS ASSASSIN 


ELECTRONIC ARTS 


RADIOSCOPIE 
Origine : Belgique 
Connection TV : péritel 
Mémoire vive: 48 K 
Couleur: 16 
Son: oui 
Joystick : oui, 2 modèles 
Entrée cartouche : non 
Crayon optique : oui 
Disquette : oui 
Miniwar Ludothèque: * x x 


Prix: 6700 F environ 
cassettes digitales à haute vitesse 
(Memocom|, lecteur de cassettes tradi- Fes 
tionnel, de disquette. Deux sortes de 
manettes sont disponibles : des joysticks 
classiques et des joysticks à trois dimen- 
sions, utilisés avec le programme CL/O. 
Leur maniement demande une. cer- 
taine expérience. 
Le DA! dispose de plus de 700 logiciels. 
Cette ludothéque est en constante pro- 
gression, à la fois quantitative et quali- 
tative. Il pourrait bien nous réserver 
d'autres surprises agréables. 


DU NOUVEAU POUR VOTRE MICRO 


INBALL CONSTRUCTION SET 
truis nt 


Le pigeon agile 


Micro Expo 
du 22 au 26 Mai -Stand P36 


اس 
Z.I. du Coudray‏ 
dii 14, av. Albert-Einstein‏ 10 
LE BLANC-MESNIL‏ 93155 


EN FRANCAIS DANS LE ТЕХТЕ 
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Voici le successeur du Victor 
Lambda HR, un micro-ordinateur trës 
performant, à condition de le pro- 
grammer en forth. En effet, le HRX 
est le seul modàle possédant un lan- 
gage résident, le forth, en mémoire 
morte. Bien sûr, cet ordinateur est 
100 % francais, il ne sera donc pas 
nécessaire d'avoir recours à un dic- 
tionnaire anglais pour utiliser la 
machine. Par exemple, la tradition- 
nelle touche «Reset» est indiquée 
par «Remise à zéro ». Il offre une 
ludothèque complète qui devrait 
encore se développer. 


RADIOSCOPIE 
Origine: France 
Connection TV : péritel 
ВАМ: basic 18 Ko 
Son: oui 
Couleur: 8 
Joystick : 2 
Entrée cartouche : oui 
Crayon optique : non 
Disquette : oui 
Ludothèque: x x ж ж 
Prix : 4 950 F environ 


L'Hector HRX possède l'un des meilleurs 
claviers que nous ayons pu rencontrer à 
ce jour. Grâce à l'interface Sécam inté- 
grée et la prise péritélévision, l'image 
produite est irréprochable. Pour faire 
fonctionner le HRX, seules, deux prises 
doivent étre connectées : alimentation et 
péritel. Pour les impatients, Hector pro- 
posera des logiciels en « Rom-pack » 
(c'est-à-dire en cartouche). Deux manet- 
tes de jeux un peu particulieres peuvent 
se connecter au HRX. Elles sont sensi- 
bles et réagissent à chaque impulsion, 
mais s'utilisent à la fois comme manet- 
tes et manche à balai. Chacune d'elles 
dispose des trois fonctions : manche, tir 
20 


HECTOR HRX 


et potentiomètre. L'ordinateur comporte 
aussi un lecteur de cassettes intégré, qui 
assure une grande fiabilité de charge- 
ment. 


L'Hector HRX possède un langage rési- 
dent superpuissant, le forth, dix fois plus 
rapide que le basic. Dans le commerce, 
le basic IIl est disponible sur cassette ou 
sur carte mémoire. Mais la mémoire vive 
utilisable n'est que de 12 kilo-octets sur 
48 Ko de départ. Le basic possède des 
logiciels intégrés pour la réalisation de 
graphismes (lignes, cercles) et il est pos- 
sible de peindre des surfaces détermi- 
nées. Vous disposez de quinze couleurs 
et d'une réalisation 243 x 231 points. 
Mais vous pourrez également afficher 
quatre couleurs simultanément, sans 
problème d'interférence, ou redéfinir des 
caractères graphiques en haute résolu- 
tion sur une matrice 5x9 ou 
8x8 points, de les animer gráce à l'ins- 
truction « Scrolling » qui permet de les 
déplacer dans toutes les directions. Pour 
créer un caractère, il faut utiliser l'ins- 
truction « Poke ». 

L'Hector HRX possede également un 
générateur de sons. Mais, là, il faut 
encore utiliser l'instruction « Poke > si 
vous voulez obtenir des bruits divers 
(chute d'eau, rayon laser, explosion). 
Pour les amateurs de jeux, le HRX pos- 
sède la commande « Joy > pour diriger 
divers graphismes avec une manette de 
jeux. 

Les anciens logiciels Victor Lambda 
fonctionnent sur les nouveaux micro- 
ordinateurs Hector, rien d'étonnant car 
entre ces deux marques, seul le nom dif- 
fère. Il s'agit malheureusement, d'une 
ludothèque en basse résolution avec des 
graphismes assez grossiers. Mais ces 
logiciels ont tous un atout incontesté, ils 
sont entièrement francais. 


Nous avons aimé : 

— son puissant langage forth ; 

— ses manettes de jeux ; 

— la fiabilité du lecteur de 
cassettes ; 

— les possibilités graphiques. 

Nous avons regretté : 

— son rapport qualité-prix ; 

— la mémoire vive en basic II! 
trop faible ; 

— l'utilisation fréquente de 
l'instruction « Poke » ; 

— son manuel presque inexistant 
en basic Ill. 


La pétanque 


Anglomanie 


VN 


Choisissez une carrière d'avenir. 


métiers 
informatiques 


l'un d'eux peut être demain le vôtre... 
. méme si aujourd'hui vous n'avez pas de diplôme. 


te ` 
Choisissez vide! 
Vous pouvez commencer vos 
études à tout moment, sans 
interrompre vos activités 
professionnelles actuelles. 


Comment apprendre rapidement et facile- 
ment un «métier du XXI* siècle? Devenir 
informaticien en 1983, c'est choisir une car- 
rière d'avenir, avec l'assurance de trouver 
immédiatement de nombreux débouchés, et 
des perspectives d'autant plus intéressan- 
tes que la place de l'ordinateur ne cesse de 
s'accroître dans tous les domaines ` écono- 
mique, social, administratif, etc. 


Quel que soit votre niveau de formation (et 
même si vous n'avez pas de diplôme), Edu- 
catel se charge de vous apprendre en quel- 
ques mois par les moyens les plus moder- 
nes, et avec un enseignement personnalisé 
à votre cas, le métier informatique qui vous 
convient le mieux, 


А la fin de votre formation Educatel, vous 
recevrez un certificat que savent apprécier 
les employeurs et nous арршегопв votre 
candidature 


Demandez, sans aucun engagement de 
votre part, notre documentation gratuite en 
nous renvoyant le bon ci-dessous ou en nous 
téléphonant au (1) 208.50.02 . 


On embauche 


des milliers d'informaticiens 


ces «techniciens de l'avenir»! 


Educate 


G.I.E. Unieco Formation 
Groupement d'écoles spécialisées. 
Etablissement privé d'enseignement 
par correspondance soumis au contrôle 
pédagogique de l'Etat. 


Département Informatique 
et Micro Informatique 


(1) 208.50.02 


ANALYSTE 


A un niveau intermédiaire entre l'utilisateur et l'application informati- 
que, vous concevez l'application et formalisez la solution qui sera 
ensuite confiée aux programmeurs (niveau d'accès : BAC + 2). 


PROGRAMMEUR D'APPLICATION 
Vous travaillez en collaboration avec l'analyste, 
testez et mettez au point les programmes (niveau 
d'accès : 2° - 1 

PROGRAMMEUR 

SUR MICRO-ORDINATEUR 

Vous maîtrisez la programmation sur micro-ordina- 
teur et le langage BASIC (niveau d'accès : 3° ou 
B.E.P.C.). 


OPERATEUR SUR ORDINATEUR 
Vous assurerez principalement les différentes 
manipulations nécessaires au fonctionnement de 
l'ordinateur (niveau d'accès: 3* - В.Е.Р.С.). 


PUPITREUR 

Vous avez un rôle de dialogue avec la machine. Le 
pupitreur effectue la mise en route, la conduite et 
la surveillance des installations de traitement infor- 
matique (niveau d'accès: 3" ou 4°). 


OPERATRICE DE SAISIE 

Votre travail consiste à saisir des informations en 
langage compréhensible pour l'ordinateur. (Acces- 
sible à tous). 

PRATIQUE DES MICRO-ORDINATEURS 
Pour acquérir très rapidement les connaissances 
nécessaires pour mettre en ceuvre et utiliser un 
micro-ordinateur. (Accessible à tous). 


INITIATION A L'INFORMATIQUE 
L'informatique fait maintenant partie de notre uni- 
vers quotidien. En quelques mois apprenez l'essen- 
tiel sur cette technique. (Accessible à tous), 


BIS, SERVICES INFORMATIQUES 
Préparation à l'examen officiel 
(Niveau d'accés: Baccalauréat) 


ANALYSTE PROGRAMMEUR 


Vous étes la charniëre entre la conception du projet et sa réalisation, 
vous adaptez chaque programme en fonction de la demande de l'utili- 
sateur (niveau d'accès : BAC) 


Les chiffres de l'ANPE le prouvent: actuellement plus de la 
moitié des postes proposés par les employeurs à des infor- 
maticiens (programmeur, opérateur sur ordinateur, etc.) пе 
sont pas pourvus, faute de candidats en nombre suffisant 
Etles spécialistes du Plan lancent un cri d'alarme : la France 
a besoin très rapidement de 100.000 nouveaux informati- 
ciens. Découvrez vite comment devenir réellement l'un de 


Si vous êtes salarié, votre étude peut être prise en 
charge par votre employeur (loi du 16.7.1971 sur la 
formation continue). 
Dossier sur demande 
pour les entreprises. 


— — — — жен жен um w mum mum шш шш, VO 
I BON pour une documentation détaillée 


sur 10 métiers de l'informatique 

OUI, je désire recevoir gratuitement (et sans aucun engagement) une documentation 
détaillée sur la formation EDUCATEL d'enseignement personnalisé des 10 métiers informatiques. 
Jy trouverai pour chaque métier préparé le plan de formation complet, son niveau d'accès, le programme des 
travaux pratiques, sa durée el son prix 

Si je le désire, une orientation el des conseils personnels me seront fournis gratuitement 
Je peux également téléphoner à EDUCATEL au (1) 208.50.02 (demander Madame LAMY). 


NOM — — Prénom 
Adresse Е 
Code postal Ville 
Téléphone (facultatif) š 
Travaillez-vous? OUI D NON D Niveau d'études 
Précisez le mëtier qui vous intéresse 
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EDUCATEL G.I.E. Unieco Formation 
3000X - 76025 ROUEN CEDEX 

Pour Canada, Suisse, Belgique: 49, rue des Augustins - 4000 Liège 
Pour TOM-DOM et Afrique: documentation spéciale par avion 


LASER 200 


UNE GENERATION PROLIFIQUE 


Le Laser 200, apparu sur le marché au 
mois de novembre 1983 annonce une 
nouvelle gónération d'ordinateurs, à 
la fois tournés vers le jeu et l'initiation 
informatique. En effet, il sera bientôt 
suivi par le Laser 300 et le Laser 500, 
tous deux d'une mémoire de 18 Ko et 
enfin du Laser 3000, un micro aux 
capacités semi-professionnelles 
annoncé compatible avec l'Apple Il et 
VIBM PC et pour moins de 6 000 F. 


Le Laser 200 comporte une interface 
Secam intégrée, et la connection au télé- 
viseur peut étre réalisée par la prise 
antenne UHF. Il est livré avec un câble 
vidéo pour l'utilisation d'un moniteur, 
l'image ainsi produite est de bien meil- 
leure qualité. Son boitier est trés sobre, 
blanc avec des touches ocre-jaune. De 
nombreuses extensions peuvent étre 
connectées : module mémoire vive 16 et 
64 Ko, manettes de jeux, imprimante 
quatre couleurs, interface centronics et 
crayon lumineux. Le Laser 200 se pro- 
gramme en basic microsoft, le langage 
informatique le plus répandu au monde. 


Nous avons aimé : 

— l'extension joystick program- 
mable ; 

— le clavier facile à utiliser ; 

— la gestion des couleurs ; 

— son rapport qualité-prix. 

Nous avons regretté : 


— la «moyenne» résolution 
d'écran ; 

— la faible méi 

— l'absence d' 
gage machine dans le 
manuel ; 


— |e changement des logiciels 
sur cassette, parfois difficile. 


Les 4 Ko de base deviennent rapidement 
insuffisants pour la réalisation de logiciels 
ludiques, l'extension 26 Ko est alors 
nécessaire. Son basic est assez classi- 
que, mais l'éditeur de textes, complet et 
maniable, facilitera le travail des néophi- 
tes. Le Laser 200 ne possède pas une 
véritable haute résolution, mais une 
«moyenne» résolution de 128 x 64 
points et huit couleurs — moins une 
lorsqu'on passe du mode 0 (texte) au 
mode 1 (graphique). — En restant en 
mode texte, vous pourrez utiliser l'un des 
seize caractéres semi-graphiques, acces- 
sibles directement au clavier par l'inter- 
médiaire de la touche « Shift ». Avec un 
peu d'astuce, les réalisations ludiques 
donnent des résultats étonnants, ceci 
gráce à la grande rapidité du basic uti- 
lisé par le Laser 200. Un générateur de 
sons, assez sommaire, permet de créer 
des mélodies. La qualité des notes émi- 
ses par vibration de lamelles métalliques, 
ne peut se comparer avec d'autres appa- 
reils. 


Pour la réalisation d'effets acoustiques 
ou musicaux, vous disposerez de trente- 
deux notes et d'une variation de temps 
allant d'un tiers de seconde à trois 
secondes. Les manettes de jeux peuvent 
étre commandées dans un logiciel de 
votre composition, en langage basic ou 
assembleur. 


La ludothèque du Laser 200 ne compor- 
tait au départ que quatre titres. Ces pre- 
miers logiciels, d'une forte dominante 
verte à l'écran, occasionnaient une 
rapide fatigue visuelle. Des défauts de 
jeunesse sans doute. Aujourd'hui, nous 
comptons plus de cinquante logiciels de 
jeux. 79 F. 


RADIOSCOPIE 
Origine : Hong-Kong 
Connection TV : 

* moniteur 
* UHF antenne Sécam 
* péritel 
RAM: 4 Ko 
Son: oui 
Couleur: 9 
Joystick : oui, 2, avec extension 
Entrée cartouche : non 
Crayon optique : oui 
Disquette : à venir 
Ludothèque: x ж x x 
Prix: 1 490 F environ 


Tchouka 


Squash 


Car Fight 


L'âne rouge 


TOUTES GRIFFES DEHORS 


Le Lynx, c'est un félin aux yeux per- 
çants. C'est aussi un micro-ordinateur 
familial, bien décidé à ne pas se lais- 
ser faire dans la jungle du marché de 
l'informatique. Toutes griffes dehors, 
il vient d'une ville de tradition : Cam- 
bridge, Angleterre. 


Le Lynx est fabriqué par une société 
indépendante, Computers Limited. De 
son lieu de naissance, il garde la sobriété 
de son aspect extérieur. De couleur 
grise, le boitier est fonctionnel. Sa taille 
est comparable à celle d'un V/C 20. 
Détail pratique : ne pas oublier de coller 
les patins de protection sous l'alimenta- 
tion sous risque d'échauffement. Tous 
les raccords sont fournis, et les interfa- 
ces communication et imprimantes sont 
incorporées au système initial. L'ensem- 
ble des connections s'effectue sur la face 
arrière. Le cordon péritélévision — un 
peu court — permet d'obtenir une image 
parfaitement stable, aux couleurs satu- 
rées. 

Le clavier Qwerty, de type machine à 
écrire, possède 57 touches répétitives. 
La frappe est agréable. L'écran possède 
une bonne définition de 248 x 256 points 
en version de base 48 K, et 248 x 512 en 
version 128 K. 

Les mots clés, en nombre limité, peuvent 
être entrés en appuyant simultanément 
sur « Esc » et une lettre. Le Lynx possède 
un excellent basic, qui reprend la struc- 
ture du langage pascal. Les ordres qui 
gèrent la haute définition sont assez 
complets : « Move » déplace le curseur, 
«Draw » trace une droite, et « Dot » con- 
crétise le point. « Plot» reprend ces 
fonctions et permet l'utilisation de coor- 
données relatives. On peut également 
mélanger texte et graphique. « Print À » 
déplace une image de point en point. 

Le Lynx dispose de huit couleurs. Cha- 
que point peut être colorié indépendam- 
ment des autres, et la fonction « Pro- 
tect» protège une couleur, tout en 


LYNX 


déplaçant des graphiques en superposi- 
tion. On peut donc déplacer un mobile 
sans effacer la couleur de fond. 

Si la vue du Lynx est exceptionnelle, sa 
voix, elle, l'est beaucoup moins. Il еп est 
de même pour l'ordinateur du même 
nom. Ses possibilités sonores ne sont 
pas très étendues. Autre faiblesse : on 
ne trouve ni emplacement pour cartou- 
ches, ni prises pour poignées de jeu. On 
doit donc avoir recours à une interface 
externe (700 F). 


Nous avons aimé : 

— son clavier; 

- ses possibilités graphiques ; 

— son basic puissant ; 

— son rapport qualité-prix. 

Nous avons regretté : 

— Ses capacités sonores peu 
étendues ; 

— l'absence de prise pour 
poignées de jeu. 


Le manuel quant à lui est très complet, 
comporte des illustrations originales. La 
ludothèque du « petit gris » est encore 
réduite, mais se construit de jour en jour. 
Elle offre des jeux de réflexion, 
d'adresse, et méme des jeux d'aventu- 
res conversationnels de fort bon niveau. 
Appareil complet, le Lynx dispose de 
grandes possibilités d'extension et 
s'avère simple d'utilisation. Son basic 
puissant et la qualité de son graphique 
sont des arguments de poids sur un mar- 
ché déjà fort encombré. 


RADIOSCOPIE 
Origine: Grande-Bretagne 
Connection TV : péritel 
Mémoire vive: 48 K 
Couleur: 8 
Son: oui 
Joystick : non 
Entrée cartouche : non 
Crayon optique : oui 
Disquette : oui 
Ludothèque: x x x x 


Prix : 3 000 F environ 


ч 


RA I 


есебі 1 


РарШоп 
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LES BEAUX JOURS 


Le succès de l'Oric 1 — qui justifie son 
rapport qualité-prix tout à fait remar- 
quable par la version 48 Ko — ne se 
démentit pas et ce, en dépit de l'appa- 
rition sur le marché de son succes- 
seur, l'Oric Atmos. Les deux appareils 
ne présentent d'ailleurs aucune diffé- 
rence sur le plan technique. 


Par sa taille, l'Oric 1 se situe à mi-chemin 
entre l'ordinateur de poche et l'ordina- 
teur de table. Son boitier et son clavier, 
de couleur sobre, ne permettent pas 
encore de le distinguer des autres ordi- 
nateurs. 


Nous avons aimé: 

— sa ludothèque importante et 
variée ; 

— son rapport qualité-prix ; 

— son basic puissant pour la 
réalisation de jeux ; 

— l'extension pour manette 
de jeux. 

Nous avons regretté : 

— sa mise en œuvre trop 
compliquée ; 

— son manuel trop bref ; 

— le changement des cassettes, 
peu fiable ; 

— l'éditeur de programmes, in- 
complet. 


La connection au téléviseur exige une 
certaine habitude, sinon gare aux pan- 
nes ! Un détail nous a semblé anormal, 
l'alimentation péritel extérieure, qui res- 
semble fort à un bricolage de dernière 
minute. Le cordon magnétophone se 
connecte au niveau de l'ordinateur par 
l'intermédiaire d'une prise DIN. Adieu les 
fidèles jacks, n'oubliez pas d'en tenir 
compte pour l'achat d'un magnéto- 
phone. L'Oric 1 possède deux vitesses 
de lecture et d'enregistrement, malheu- 
reusement la plus rapide n'est pas trés 
fiable. Reste la première vitesse, assez 
lente, mais beaucoup plus süre. 


EE 
аай sk тг si sk si siku si si ms; ші ЕШ 

РТТ ші ай шї ий шї sg; 

sb ai sb ak ak пі шї ni nk sk ss; mz ийи 

ай ай ай ні пй їй кі ай ші тї іі 

E f тин ті КЕН 
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ORIC 1 


Deux versions 16 ou 48 Ko confërent à 
l'Oric 1, l'un des meilleurs rapports 
qualité-prix. Graphisme, couleur et son, 
tout y est. Son basic microsoft est puis- 
sant, mais l'éditeur, incomplet, ne per- 
met pas aux débutants une initiation 
aisée. Les huit couleurs et la haute réso- 
lution, 240 x 200 points, sont trés sim- 
ples à utiliser. L'Oric 1 ne dispose pas des 
sprites mais vous pourrez redéfinir des 
caractères sur une matrice 8 x 8 points. 
Cela vous permettra de réaliser des jeux 
avec une animation graphique. ІІ com- 
porte aussi un générateur musical à trois 
voix. Pour améliorer la qualité sonore, 
n'hésitez pas à le connecter à votre 
chaine hi-fi, le résultat vous étonnera. 
« Zap » émet un son d'arme galactique 
à laser, « Ping » le tintement d'une clo- 
chette, « Shoot» la détonation d'un 
coup de fusil et « Explode » une explo- 
sion. Le manuel, trop bref, n'aborde pas 
toutes les finesses de la programmation, 
le langage machine, notamment, est 
passé sous silence. Mais, les possibilités 
du basic de l'Oric 7 permettent l'élabo- 


ration de jeux assez évolués pour un tel 


langage. 

Avec l'apparition de l'extension joystick, 
l'Oric 1 est devenu un ordinateur de jeux 
à part entière. Sa ludothèque s'est beau- 
coup étoffée en moins d'un an car, d'une 
dizaine de logiciels, nous en dénombrons 
aujourd'hui une centaine. Actuellement, 
la majorité des jeux proposés par 
Loriciels-No Man's Land et Dialog infor- 
matique, réalisés par des Francais fonc- 
tionnent sur Oric 1 et Atmos. Leur but ? 
Proposer sur le marché francais et peut- 
être pour l'exportation des logiciels entiè- 
rement « Made in France » pour concur- 
rencer les créations outre-Atlantique. 
L'Oric-Atmos, qui prend aujourd'hui la 
reléve, a de beaux jours devant lui. 


RADIOSCOPIE 
Origine: Grande-Bretagne 
Connection TV : 

* péritel 

* UHF antenne pal 
RAM: 16 ou 48 Ko 
Son: oui 
Couleur: 8 
Joystick : avec extension 1 
Entrée cartouche : non 
Crayon optique : oui 
Disquette : oui 
Ludothèque: * x x * x 
Prix: remplacé par l'Atmos, 
2450 F environ 


Oric-Briques 


Altitude 0 


Longchamps 


Tiltman 


Yeno, vous пе connaissez раз 
encore ? Pourtant, il s'agit du Sega SC 
3000 doté d'un clavier mécanique et 
d'une mémoire de base beaucoup 
plus puissante de 32 Ko RAM. Son 
constructeur, Sega, est un spécialiste 
de la création de jeux vidéo. C'est 
pourquoi le Yeno SC 3000 possède 
d'excellentes qualités graphiques en 
haute résolution et une grande faci- 
lité d'animation. 


Le clavier est extrêmement complet et 
facilite grandement la saisie des pro- 
grammes. Sur le côté du boîtier, quatre 
touches d'édition facilitent la correction 
des erreurs qui peuvent se glisser dans 
l'élaboration d'un logiciel. Les 
connections sont fiables et simples, il 
suffit d'utiliser la prise péritélévision. 
Mais attention, car le cáble cassette n'est 
pas fourni avec l'appareil. 

Les passionnés de jeux pourront assou- 
vir leur vice, soit à l'aide d'un ou deux 
joysticks, soit en utilisant les quatre tou- 
ches d'édition. Mais le SC 3000 est-il dif- 
ficile à programmer en basic ? Eh bien 
oui et non. Si certaines instructions vous 
facilitent la tâche, en revanche, avec 
d'autres, vous risquez la crise de nerfs. 
La mémoire vive utilisable de 16 ou 
32 Ko est trés correcte, à condition de 
rester dans des domaines classiques, саг 
il est assez gourmand en octets. Aux 
côtés des instructions pratiques comme 
« Bancle » qui trace un cercle, vous 
pourrez commander une manette de 
jeux dans vos propres logiciels. 


Nous avons aimé : 

— son rapport qualité-prix ; 

— l'animation graphique en basic 
(32 sprites) ; 

— le manuel francais, clair ; 

— sa facilité d'utilisation. 

Nous avons regretté : 

— les manettes de jeux Sega ; 

— la programmation de la durée 
des sons; 

— l'impossibilité de mélanger 
textes et graphismes en haute 
résolution ; 

— le clavier caoutchouc pour la 
première version. 


Plusieurs instructions vous aideront à 
concevoir des logiciels de jeux. La plus 
intéressante étant sans aucun doute 
« Sprite ». Vous définissez avec « Pat- 


SEGA-YENO SC3000 


CHAPEAU BAS! 


TTL] rrr 
EC SE Bu 


tern > au plus 32 caractères graphiques 
sur une matrice de 8 x 8 points. Vous 
pourrez ensuite intervenir sur ces carac- 
téres à loisir et ainsi les animer, changer 
leur taille... Pour obtenir de beaux gra- 
phismes, il n'y a pas de secret, il faut un 
ordinateur avec des qualités artistiques. 
Le SC 3000 n'en manque pas, car en 
plus d'une haute résolution de 
256 x 192 points, il dispose de seize 
couleurs. 


RADIOSCOPIE 
Origine: Hong Kong 
Connection TV:  * péritel 
ВАМ: 16 ou 32 Ko 
Son: ou | 


environ 


La génération de musique est, elle aussi, 
pleine de surprises. Le SC 3000 possëde 
un synthétiseur à six canaux, les notes 
émises s'échelonnant sur quatre octa- 
ves. Vous sonoriserez vos logiciels дгасе 
aux instructions « Bip» et « Sound ». 
Enfin, si la musique sur ordinateur vous 
attire, le SC 3000 possède d'excellentes 
qualités sonores. 

Sega est connu pour ses logiciels d'arca- 
des. Le SC 3000 пе démentira pas cette 
solide réputation, car les jeux fonction- 
nant sur le Yeno s'inscrivent parmi les 
meilleurs actuellement commercialisés 
sur le marché. Le Yeno SC 3000 est un 
micro-ordinateur qui conviendra aux 
débutants. Son manuel est un peu aus- 
tère car il présente les instructions basic 
sans suite logique. Mais, chacune d'elles 
est accompagnée d'un exemple qui faci- 
litera la compréhension de ce langage. 
Un coup de chapeau à Sega qui propose 
un ordinateur avec l'un des meilleurs гар- 
ports qualité-prix. 


Formule 1 


5.0.8. Lune 


Torpilleurs 


Mission Survie 


Othello 
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Après le succès foudroyant des ZX 80 
et 81, Sinclair se devait de les doter 
d'un grand frère, qui conserve leurs 
principales qualités et gomme leurs 
défauts les plus gênants. A cet égard, 
le Spectrum est une réussite. 


Un peu plus grand que son prédéces- 
seur, le Spectrum a une esthétique 
agréable. l| se présente comme une 
petite boîte noire, facilement reconnais- 
sable grâce à sa bande aux couleurs de 
l'arc-en-ciel. Il est livré avec un cordon 
de raccordement péritel. Son clavier 
Qwerty, à touches en gomme, est supé- 
rieur à celui du ZX 87, même si sa mol- 
lesse de frappe ne peut lui permettre de 
rivaliser avec un « vrai » clavier. Les tou- 
ches sont à répétition automatique et 
possèdent chacune plusieurs fonctions. 


L'entrée des mots clés s'effectue en une 
seule opération. C'est pratique, à condi- 
tion de bien maîtriser le clavier, car les 
symboles sur chaque touche abondent ! 
La définition graphique est de 
176 х 256 points. Huit couleurs sont 
offertes, qui peuvent clignoter, et sont 
proposées chacune en deux brillances. 


Détail intéressant pour ceux qui ne pos- 
sèdent qu'un téléviseur noir et blanc : les 
couleurs se traduisent par une gamme 
de gris décroissants. Cóté graphisme, 
« Draw » trace une droite ou une courbe 
entre le dernier point et les coordonnées 
relatives précisées, « Plot » concrétise le 
point, et « Circle » dessine un cercle. Ces 
instructions permettent de travailler faci- 
lement avec les graphiques. On regret- 
tera seulement l'absence d'une com- 
mande permettant le remplissage d'une 
figure fermée. Mais on dispose de 
16 caractères semi-graphiques et de 
21 caractéres reprogrammables et mixa- 
bles en plus du texte et des graphiques. 
Seuls reproches : la qualité des couleurs 
n'est pas toujours irréprochable, et cha- 
que carré de 8 x 8, correspondant à un 
caractére, ne peut contenir que deux 
couleurs. 


Nous avons aimé : 

— son rapport qualité-prix ; 

— ses possibilités graphiques ; 

— sa ludothéque. 

Nous avons regretté : 

— l'absence de logement 
cartouche ; 


— son clavier. 


26 


ZX SPECTRUM 
DE L'ETOFFE 


Cars 


Helicos 


La voix du Spectrum est un peu faible, 
mais on peut l'amplifier par l'intermé- 
diaire de la prise micro. Elle offre une 
étendue de 10 octaves, ce qui constitue 
un record. « Beep > gère les sons et indi- 
que durée et hauteur des notes par rap- 
port au do de la clé. Les sons ainsi obte- 
nus, émis par le petit haut parleur incor- 
poré, sont de faible intensité et de qua- 
lité moyenne. On peut cependant amé- 
liorer le systeme en branchant un petit 
amplificateur au téléphone sur la prise 
« mic ». Le Spectrum peut recevoir une 
extension de mémoire 32 K, imprimante, 
lecteur de disquettes. Pour la version 16 
K: imprimante, lecteur de disquettes 
type Cyborg ou Sinclair. Dans ce dernier 
cas, il s'agit d'une bande sans fin. Le 
modéle n'est pas encore commercialisé 
en France. L'interface cassette intégrée 
est fiable, à condition de débrancher les 
jack « ear » et « mic » à la sauvegarde. 
Pour les poignées de jeu il existe deux 
types d'interface : une simple qui permet 
de brancher deux manettes ; une autre, 
plus compléte, qui autorise la connection 
d'une seule manette, mais qui constitue 
un amplificateur sonore et améliore 
encore la fiabilité de l'interface cassette. 
Les manettes sont des « Quick Shot » — 
les méme que pour le ZX 87 —, excel- 
lentes. La gamme des logiciels de jeux 
est trés étendue et ne cesse de s'étof- 
fer. Elle comprend des jeux de réflexion 


(Echecs, Othello, Awari), d'aventures 
semi-graphiques, de simulation (vol, 
entreprise pétrolière, commerce, aéro- 
роп), d'éducation, et de très nombreux 
jeux d'action. 


RADIOSCOPIE 
Origine : Grande-Bretagne 
Connection ТУ: péritel 
Mémoire vive: 16 K 
Couleurs écran: 8 
Son: oui 
Joystick : oui 
Entrée cartouche : non 
Crayon optique: non 
Disquette : oui 
Ludothèque: * x x ж x 
Prix : 1 850 F (16 K péritel). 


CTI ON 


LES JEUX ET LES MICRO DU FUTUR AU PRÉSENT 


ө MICRO-ORDINATEURS 
ө ATARI (600 XL et 800 XL) 
e APPLE 
e COMMODORE 

e LOGICIELS 
e en stock 
les meilleurs programmes 
en tête des hit-parade 


américains 

e sur commande 
tous les logiciels 
disponibles aux U.S.A. 
(+ de 4000 titres). 


e VENTE/REPRISE et LOCATION 
e VENTE PAR CORRESPONDANCE 
e SERVICE “NOUVEAUTES” 

16 (1) 622.17.79 


117, AVENUE DE VILLIERS 75017 PARIS - M? PEREIRE - TEL. 766.11.77. 
OUVERT DU LUNDI AU SAMEDI INCLUS DE 10 H A 19 H 30 


Boderma 


APPLE 


UN 


LA ROLLS DES MICROS 


Si Apple vient d'annoncer la venue 
d'un nouvel ordinateur, le Macintoch, 
l'Apple ІІ, apparu il у a presque 
six ans, est encore prêt à faire face à 
la concurrence sans cesse croissante. 
L'Apple ІІ est sans doute l'ordinateur 
qui nous a réservé le plus de surpri- 
ses, autant par le nombre de ses 
extensions que par la variété de ses 
jeux. 


ll a souvent été présenté comme la 
«Rolls» des micro-ordinateurs, une 
chose est sûre, son prix justifie pleine- 
ment cette affirmation puisque il vous en 
coûtera environ 15 000 F pour obtenir 
l'unité l'unité centrale, le moniteur (écran 
TV vert et blanc), un lecteur de disquet- 
tes et un contróleur (joystick). 


Nous avons aimé: 

— sa très vaste ludothèque ` 

— ses nombreuses extensions ; 
— sa grande fiabilité ; 

— la qualité des graphismes. 
Nous avons regretté : 

— son rapport qualité-prix ; 

— ses dimensions ; 

— son basic incomplet ; 

— listings de jeux pour Apple 11°. 


L'Apple // possède la plus grande variété 
et la plus vaste ludothèque existante sur 
un micro-ordinateur. Les jeux ne sont 
pas sa vocation premiére ; programma- 
tion et gestion d'entreprise restent, 
jusqu'à nouvel ordre, ses sports favoris. 
L'Apple Ile, nouvelle version de l'< ancé- 
tre » Apple Il, possède entre autre, une 
mémoire vive de 64 Ko. ІІ se connecte 
directement sur un moniteur Philips, 
l'image, bien qu'en vert et blanc, 
demeure excellente. Une carte, livrée en 


option et dotée d'une sortie vidéo péri- 
télévision adapte l'Apple au système 
Secam. Elle offre, autre avantage pré- 
cieux, la trés haute résolution de 
560 x 192 points. Celle-ci est réservée 
aux utilisateurs Francais, seuls capables 
d'étendre, avec cette extension, la 
mémoire vive de leur ordinateur à 
128 Ko. En version de base, la haute 
résolution atteint 280 x 192 points avec 
Six couleurs, ce qui n'est pas si mal. 
La nouvelle version de l'Apple Ile, dis- 
pose aujourd'hui d'un connecteur joys- 
tick extérieur. Son clavier gris est 
dépouillé de toutes les petites touches 
inutiles, et programmer devient un véri- 
table plaisir. Cet ordinateur est totale- 
ment modulable, c'est le système évo- 
lutif par excellence. 


Dans sa version de base de 64 kilo-octets 
mémoire vive, l'Apple // programme en 
basic Applesoft. Les habitués constate- 
ront que ce langage comporte quelques 
lacunes. Mais, il est possible de s'offrir 
le logo, l'assembleur, le pascal, le forth 
ou le basic évolué. Ne possédant que 
très peu d'instructions graphiques, 
l'Apple 1! n'est pas l'outil idéal pour la 
réalisation de jeux d'action. Mais la créa- 
tion de jeux d'aventures se révèle beau- 
coup plus facile. Pour réaliser des jeux 
d'arcades, l'assembleur offre le maxi- 
mum de garanties. Le mode texte donne 
accès à 24 lignes de 40 ou 80 caractères. 
Vous pourrez également composer de 
petites musiques, mais celles-ci n'ont 
rien d'exceptionnel. Le point fort de 
l'Apple Il est indiscutablement sa biblio- 
thèque de logiciels, développée par un 
grand nombre de sociétés américaines. 
Mais, depuis presque un an, des socié- 
tés francaises commercialisent des logi- 
ciels en francais, presque exclusivement 
sur disquettes. Seul regret, leur prix qui 
avoisine les 500 F. 


RADIOSCOPIE 
е: États-Unis 
Connection TV : 
* moniteur et prise péritel avec 
extension Sécam 
ВАМ: 48 Ko 
Son: oui 
Couleur: 16 
Joystick : 2 
Entrée cartouche : non 
Crayon optique: oui 
Disquette : oui 2 
Ludothèque: x x ж x ж x 
Prix : 9 950 F environ 


SCORE 


ENTREZ L'ANGLE DE TIR 7 8 


SCRATCH 


Kamikaze 


Alcooltest 


ой нє» 11 


Stock Саг 


702 en péril 


REGRETS ETERNELS 


Le TI99, c'est une star hollywoo- 
dienne. Apparu en 1980 sur le marché 
américain, il s'envole rapidement vers 
la célébrité. Et disparaît en pleine 
gloire, à la fin de l'année 1983. Regrets 
éternels. Car Texas Instruments pro- 
posait une machine facilement utili- 
sable, aussi bien par les adultes que 
par les enfants (bravo les manettes !) 
aussi à l'aise dans le jeu que dans la 
programmation. 

Le clavier de type Qwerty est fonction- 
nel et efficace, malgré sa petite taille. Il 
compte 48 touches à répétition automa- 
tique, dont 15 de fonctions program- 
mées et 31 programmables avec ver- 
rouillage alphabétique minuscules et 
majuscules. Pas de probléme pour bran- 
cher la prise péritel, à condition de se 
rapprocher du téléviseur: le cable est 
bien court ! L'une des principales quali- 
tés du 7/99 est son générateur de sons : 
3 sons simultanés sur 5 octaves. Le 
générateur de bruits modulables, hertz 
par hertz — de 20 Hz à 110 Hz - est inté- 
gré dans la console. Malgré le tableau de 
correspondances, la programmation par 
fréquence est moins agréable que celle 
réalisée note par note, si l'on veut jouer 
un air précis. 


Nous avons aimé : 

— son desig 

— ses possibilités sonores ; 

Nous avons regretté: 

— la suppression du 7/ 99 sur le 
marché ; 

— certaines limitations du basic 
résident ; 

— sa difficulté de gestion 
graphique. 


L'image obtenue est de bonne qualité. 
Le « Ti Basic» — particulier mais pas 
aussi spécifique qu'on pourrait le penser 
— constitue le langage résident avec des 
moyens supplémentaires le basic 
étendu, l'assembleur, le TI logo et 
l'UCSD Pascal restent accessibles. 

Le graphisme est défini par 
192 x 256 points, et l'on dispose d'une 
palette de 16 couleurs. Celles-ci sont 
gérées assez facilement par l'instruction 
€ Call Color». L'image est définie par 
24 lignes (c'est peu) et 32 colonnes. 
L'écran n'est adressable point par point 
qu'avec certains langages. 

De méme, la haute définition n'est pas 


TI 99/4A 


Météores 


Racing Z 


Capricorne Two 


directement accessible sur le basic stan- 
dard. En revanche, cóté extensions, pas 
de probléme : imprimante, extension de 
mémoire 32 K, modem, lecteur de cas- 
settes, de disquettes, et synthétiseur 
vocal doté d'une bibliothéque de 
300 mots. On peut également enficher 
des cartouches, en toute sécurité : l'ali- 
mentation des circuits correspondants 
est coupée automatiquement lors de 
l'engagement d'une cartouche. Aprés 
l'enclenchement, ces circuits sont remis 
sous tension. 


Si le 7/ 99 n'est plus présent dans les 
rayons des magasins, pas de probléme 
par contre cóté logiciels, au moins pour 
l'instant. La ludothéque est intéressante 
et variée. On trouve des programmes sur 
cassettes, disquettes et modules enfi- 
chables, et pour tous les goûts : jeux 
éducatifs bien construits, jeux d'aventu- 
res, de stratégie (Echecs, Othello, Puis- 
sance 4), d'adresse, avec des bruitages 
et des décors réussis. Bien sûr, le 7/ 99 


Master 


Ludicourb 


а aussi quelques défauts. Les extensions 
sont chères, le TI Basic est lent et peu 
puissant et la programmation du gra- 
phisme demeure complexe en basic 
étendu. Enfin et surtout, il faut se rabat- 
tre sur le marché de l'occasion pour se 
procurer un 7/ 99... 


RADIOSCOPIE 
Origine: Etats-Unis 
Connection TV : péritel 
Mémoire vive: 16 K 
Son: oui 
Couleur: 16 
Joystick : oui 
Entrée cartouche : oui 
Crayon optique : non 
Disquette : oui 
Ludothèque: x x ж x x 
Prix: 1000 F environ* 


* D'occasion, l'ensemble complet, entre 1 500 F et 4 500 F 
«selon inventaire ». 


Un cocorico pour le TO7, micro fami- 
lial français. ЇЇ est agréable à l'œil et 
très facile à mettre en route. 


L'alimentation est intégrée, il suffit de 
brancher le 707 sur le secteur et sur la 
prise péritel d'un poste TV pour qu'il soit 
prêt à l'emploi. Dans l'enthousiasme, ne 
pas oublier pourtant de vérifier que la 
cartouche de basic est bien dans son 
chargeur. Le 707, en effet, n'a pas de 
basic résident. Mais celui proposé sur 
cette fameuse cartouche a été mis au 
point par Microsoft lui-même, et quelle 
réussite! Sa puissance fait presque 
oublier la faible capacité de mémoire vive 
de la machine (8 K utilisateur en version 
de base). 


Nous avons aimé : 

— son crayon optique ; 

— sa présentation ; 

— ses capacités graphiques ; 

Nous avons regretté : 

— son manque de mémoire vive ; 

— son clavier; 

— les manettes de jeu peu 
pratiques ; 


A proximité du clavier, un crayon opti- 
que vient se cacher dans son logement. 
Bonne idée, ce crayon. |! permet de 
a converser » plus facilement avec la 
machine. Hélas, il faut, pour s'en servir, 
mettre la luminosité à fond, et bien sür 
s'approcher trés prés de l'écran. Les 
yeux n'apprécient que modérément 
cette gymnastique. Si son clavier, reste 
de glace face à de la confiture-qui- 
dégouline, les touches, avec leur rebord, 
ont une fácheuse tendance à rebondir. 
Heureusement, ces touches sont auto- 
répétitives, et leur appui est confirmé par 
un « bip » sonore, un peu fatigant mais 
efficace. L'image obtenue sur le télévi- 
seur est stable et les couleurs sont satu- 
rées. L'affichage apparaît sur une fenê- 
tre de 25 lignes et 40 colonnes, définie 
sur 320 x 200 points, ce qui est excel- 
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TO 7 
EN FAMILLE 


lent pour une machine de cette gamme. 
On peut mélanger facilement texte et 
graphisme. Les huit couleurs (y compris 
le noir et le blanc) sont très faciles à gérer 
et disponibles simultanément sur l'écran, 
quelle que soit leur proximité. 

Le 7O7 est doté d'un générateur qui per- 
met la composition musicale sur 5 octa- 
ves. Les commandes sont trés simples : 
« Play » permet de programmer facile- 
ment la musique. Il suffit d'écrire les 
notes (do, ré, ті,...) et de préciser atta- 
que, longueur, octave, tempo. 

La paire de manettes de jeu n'est pas 
idéale. Leur tenue n'est pas trés adap- 
tée aux mains des enfants, le bouton 
d'action plutót mou, tout comme le res- 
sort de rappel du manche, ne facilite pas 
la táche des maniaques du joystick. La 
ludothèque proposée par Vifi-Nathan est 
de qualité, et s'étoffe de mois en mois. 
On trouve essentiellement des jeux de 
réflexion à caractère éducatif. TO Tek, 
une marque créée par Thomson, prépare 
des jeux d'arcades trés évolués. D'ici la 
fin de l'année, l'ensemble des éditeurs 
devraient sortir plusieurs dizaines de logi- 
ciels. On ne peut plus dire que l'inten- 
dance du 707 ne suit pas ! ІІ aurait été 
d'ailleurs dommage de ne pas profiter 
des capacités graphiques de cet ordina- 
teur, par ailleurs intéressant pour l'édu- 
cation et l'initiation. 


RADIOSCOPIE 
Origine : France 
Connection TV : 
* péritel 
Mémoire vive : 22 K (8 K utilisa- 
teur) 
Couleur: 8 
Son: oui 
Joystick : oui 
Entrée cartouche : oui 
Crayon optique : oui 
Disquette : oui 
Ludothèque: ж x ж 
Prix: 2500 F environ + 530 F 


cart. basic. 


Parcours 


Nuclear 


Les tours infernales 


des dE І 


ОМ ЕМЕМЕМЕМТ... 


Almanach de l'Aventure et du Voyage en vente partout. 45, 


PROGRAMMÉ POUR JOUER 


Le VIC 20 de Commodore est l'un des 
premiers micro-ordinateurs à connai- 
tre une très grande diffusion. Aprés 
presque trois ans de commercialisa- 
tion, deux millions de VIC 20 ont été 
vendus dans le monde. Malgré ce 
succés, il a été remplacé par un 
modèle plus performant, le Commo- 
dore 64. Mais le VIC 20 garde toujours 
de nombreux adeptes, pour preuve: 
le trés grand nombre de logiciels ludi- 
ques disponibles dans les boutiques 
spécialisées. 


L'aspect du Commodore V/C 20 est trés 
proche du Commodore 64, seules leurs 
couleurs sont différentes. Le V/C 20 pos- 
séde un boitier beige avec un clavier 
brun compact, dont quatre touches de 
fonctions sur le côté droit. Après une 
longue attente, Procep commercialisa 
son appareil avec un modulateur Sécam, 
intégré, qui remplaca avantageusement 
l'interface PS 2000, trop coüteuse. Le 
VIC 20 peut donc fonctionner sur la piste 
antenne de n'importe quel téléviseur 
francais. Un petit regret sans gravité : il 
n'existe qu'un seul connecteur pour 
joystick et les branchements sont nom- 
breux. 

Trés rapidement, les 3,5 Ko mémoire 
vive de base vont devenir insuffisants. 
Dans ce cas, une seule solution : éten- 
dre les capacités du V/C 20 jusqu'à 
16 Ko, gráce à une cartouche d'exten- 
sion mémoire. ІІ ne dispose pas de la 
haute résolution graphique, mais de 
23 lignes de 22 caractères. Avec ses 
16 couleurs et les caractéres semi- 
graphiques, la création de jeux est tout 
de méme possible. Mais, en utilisant le 
langage machine par l'intermédiaire des 
instructions < Peek > et « Poke > vous 
pourrez redéfinir des caractéres, pour 
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vic 20 


Nous avons aimé : 

— son port cartouche ; 

— sa ludothèque 
impressionnante ; 

— sa grande fiabilité ; 

— le nouveau modéle avec 
interface Secam intégrée. 

Nous avons regretté : 

— la faible résolution graphique ; 

— son basic un peu particulier ; 

— la possibilité de connecter un 

seul joystick; 

sa faible mémoire vive de 

base. 


cela il faut de bonnes connaissances du 
basic. Celui du V/C 20 est assez complet, 
mais présente quelques particularités 
d'utilisation. Exemple, il n'est pas pos- 
sible de commander un joystick à l'inté- 
rieur du logiciel sans un super expander 
de mémoire vive. 

Le VIC 20 possède un générateur de 
sons (alto, ténor, soprano). Il est ainsi 
possible de le transformer en orgue élec- 
tronique. Tous les éléments sont pré- 
sents pour la réalisation de logiciels ludi- 
ques. Le manuel d'emploi l'accompa- 
gnant est clair, on y apprend par exem- 
ple comment animer des oiseaux sur 
l'écran. Les notions difficiles sont expli- 
quées par des bulles, facon bande des- 
sinée. Le V/C 20 est doté aujourd'hui 
d'une fabuleuse ludothèque. Loriciels et 
Run Informatique proposent depuis 
quelques mois des jeux francais pour ce 
micro-ordinateur, une tentative timide, 
bien accueillie par le public. Ordinateur 
passionné de programmation, il se trans- 
forme, avec une manette de jeux et les 
cartouches, en véritable console. Mal- 
heureusement, Commodore compte 
bientót suspendre définitivement la com- 
mercialisation du V/C 20. 


|. Entrée cartouche : oui 


RADIOSCOPIE 
Origine: Etats Unis 
Connection TV : 
* UHF antenne Secam 
* UHF antenne pal 
* péritel 

RAM: 3,5 Ko 

Son: oui 

Couleur: 8 

Joystick: 1 


Crayon optique : oui 
Disquette : oui 
Ludothèque: ж x x x ж 
Pris : 2 390 F environ 


Globber 


Schuss 


Laser Omega 


ZX 81 


LA FOLIE DES GRANDEURS 


Doit-on encore présenter le ZX 81711 
fait déjà figure d'ancétre, et les 
méchantes langues pourraient l'affu- 
bler de tous les défauts : un clavier qui 
n'en est pas un, une mémoire vive 
ridicule (1K !) en version de base, pas 
de son, pas de couleur, une image TV 
de qualité moyenne et une connec- 
tion sur la prise antenne... Stop ! Arré- 
tez le massacre! 


Le ZX 87, c'est d'abord une réussite ex- 
tra-or-di-nai-re : le million d'exemplaires 
est largement dépassé, dont plus de 
110 000 exemplaires vendus en France. 
C'est, à lui seul, un véritable phénomène 
de la micro-informatique. 

Car le ZX 81 est un authentique ordina- 
teur au rapport qualité-prix sans concur- 
rence, doté d'une ludothéque convena- 
ble et d'énormes possibilités d'extension. 
Il se transforme à mesure que grandit la 


Nous avons aimé : 

— sa ludothéque ; 

— son rapport qualité-prix ; 

— ses possibilités d'extension ; 
— ses manettes de jeux. 
Nous avons regretté : 

— son olavier a membran 
— son manque de mémoire vive. 


maitrise informatique de son proprié- 
taire, au point de devenir presque 
méconnaissable, avec un clavier électro- 
nique, 48 K RAM, le son, la couleur... 
La carte sonore, par exemple, donne aux 
jeux une nouvelle dimension, avec trois 
voies simultanées programmables sur 
sept octaves avec contróle de l'enve- 
loppe. La carte couleur offre une palette 
de 16 couleurs et permet l'utilisation 
d'une prise péritel, d'oü la facilité de mise 
en place et la qualité des images. 

Les deux manettes de jeu se branchent 
par l'intermédiaire d'une interface qui 
contróle les deux poignées dont la prise 
en main est excellente. Deux boutons 
d'action sont disponibles, un sur le haut 
de la manette, l'autre sur le boitier, qui 
est, quant à lui, muni de ventouses pour 
jouer d'une seule main. 

Pour profiter des jeux disponibles sur 
cartouches, il suffit de se procurer une 
interface, qui offre, en outre, la haute 
résolution. Rappelons qu'en version de 
base, le ZX 87 ne propose qu'une défi- 
nition graphique de 44 x 64 points, géra- 
bles uniquement par « Plot. » 


La ludothéque est compléte: jeux 
d'action, jeux d'aventures, wargames, 
jeux de réflexion, de simulation (vol, 
escalade). Tous ces jeux nécessitent 
l'extension de mémoire 16 K. 


BË DEVANT LA 
Ë pe cusrwus 


FAITES-vOUS 7 


La résidence secondaire 
du savant fou 


Pour un prix de base défiant toute 
concurrence, Sinclair propose un vérita- 
ble ordinateur. Et, contrairement à la 
grenouille de la fable, il saura devenir — 
presque — aussi gros que le bœuf ! 


Appontage 


Glouton 


RADIOSCOPIE 
Origine : Grande-Bretagne 
Connection ТУ: antenne 
Mémoire vive: 1 K 
Couleur: non 
Son: non 
Joystick: oui 
Entrée cartouche : oui 
Crayon optique : non 
Disquette : oui 
Ludothèque: x x x x x 
Prix : 580 F 
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MICRO/JEUX / VIDEO 


ou Chaque mois, 
recevez Tilt chez vous. 


Vous économiserez 35 F. 


En vous abonnant dès aujourd'hui à TILT vous bénéficierez d'une réduction 

exceptionnelle de 35 F sur votre abonnement d'un an : vous ne r&glerez en 
effet que 130 F pour 10 numéros au lieu de 165 F, prix au numéro. Et puis vous 
êtes assuré que ce prix ne bougera pas puisqu'il sera payé une fois pour toutes. 


| Vous recevrez TILT, dès parution 


‚ 10 numéros par ап. Dès que TILT sort de presse, les 

' numéros des abonnés sont expédiés sans délai. 
Et vous savez que dans chaque numéro de TILT : 
-vous découvrez les nouveaux jeux électroniques en avant première (consoles, 
micro ordinateurs, flipper, échecs, backgammon, jeux de poche, calculettes). 
- Vous choisissez les plus performants grâce à des tests complets et détaillés. 
- Vous améliorez vos performances car TILT vous donne des trucs de spécialistes 
pour devenir un vrai champion. 
- Vous mettez au point des jeux inédits 
qui feront de vous le «spécialiste» qui 
utilise à fond les possibilités de ce 
nouveau domaine. 


› Vousrevevrez 
un cadeau : 
JEUX EN TETE 

un numéro de TILT 
hors série. 


16 pages de jeux inédits faisant ap- 
pel, entre autre, à la logique, la pa- 
tience, la déduction, le calcul, l'ob- 
servation etc... De quoi stimuler vos 
cellules grises qui adorent cela ! 


Aujourd'hui même 
renvoyez la carte ci-contre. 


SE 


ЯС 


ffrez-vous la possibilité d'adapter des pro- 
grammes créés pour des ordinateurs 
différents du vótre. En effet, certains 
micro-ordinateurs possèdent des caracté- 
ristiques communes. Par exemple, l'ins- 
truction «Sprite» se retrouve sur le 
Commodore 64, le Yeno-Sega SC 3000 et 
les Atari 400, 800, 600 XL et 800 XL. Les jeux concus 
pour ces ordinateurs sont facilement adaptables. 
Malheureusement, il ne suffit pas de prendre un pro- 
gramme ligne par ligne et de remplacer la syntaxe des 
ordres de basic. Il faut aussi tenir compte de nombreux 
autres impératifs, la taille de l'écran en haute résolu- 
tion, le nombre de couleurs, les sons... Certains micro- 
ordinateurs possédent des ordres qui leur sont 
propres. Il est alors difficile de transcrire un pro- 
gramme d'une machine à l'autre. Ce type d'exercice 
est facilité si vous maîtrisez parfaitement la program- 
mation de votre ordinateur. Bien sûr, l'adaptation ne 
semble pas évidente au premier abord, mais, avec de 
la persévérance, vous trouverez forcément la solution 
de tous vos problémes. Les tableaux qui suivent sont 
là pour vous aider. 


ORDINATEURS 


ÉQUIVALENCES DES INSTRUCTIONS BASIC 


ALICE - MATRA 
MC 10 - TANDY 


ATARI 600 XL/800 XL/400/800 


COMMODORE 64 


ABS (x) 


COMMODORE-VIC 20 ABS (x) - xAND y ASC (x$) — АТМ (x) = T 
DAI ABS (x) А COS (x) X AND y ASC (x$) A SIN (x) ATN (x) - - 
ЖАЛТАРУЫ 
DRAGON 32/64 ABS (x) - хАМру ASC (x$) - АТМ (x) — = 
ELECTRON ACORN È 
BBC modèle B ABS (x) ACS (x) x AND y ASC (x$) ASN (x) ATN (x) AUTO x, y 
HECTOR HRX - BASIC MI ABS (x) _ ATN (x) AUTO x, y He 
LASER 200/300 et 500 ABS (x) - ATN (x) - — 
ABS (x) ARC SIN (x) | АВС TAN (x) AUTO x,y - 
ABS (x) _ xAND y ASC (x$) _ АТМ (x) - - 
SINCLAIR - ZX 81 ABS (x) ACS (x$) xAND y _ ASN x) АТМ (x) - - 
ASN (x) 
SINCLAIR ZX - SPECTRUM ABS (x) ACS (x$) xAND y - АТМ (x) = BIN (x) 
TEXAS INSTRUMENTS => ai 
TI 99/4A < ABS (x) _ xAND y ASC (x$) АТМ (x) NUM x, y 
inan 22 Бе» даа Es 
ABS (x) _ x AND y ASC (x$) _ _ AUTO x, y &B (x) 
— 
ABS (x) ACS (x) x AND y ASC (x$) ASN (x) ATN (x) AUTO x, y _ 


ORDINATEURS 


ÉQUIVALENCES DES INSTRUCTIONS BASIC 


routine en 


ALICE - MATRA 
MC 10 - TANDY 


ATARI 600 XL/800 XL/400/800 


APPLE Ile CAL x 


7 CHRS (x) 


CLOAD “” 


? CHRS (x) 


LOAD “” 


7 CHRS (x) 


CLOAD “" 


CLOAD “” | GRAPHICS g 


ATMOS - ORIC 


— | = = 
ЕНЕСІН 


ELECTRON ACORN 
BBC modële B 


SINCLAIR - ZX 81 


HECTOR HRX - BASIC III | === | ? CHR$ (x) 


SE ESESBESES 
һе |= [=e] - | 


CALL x ? CHRS (x) 


? CHRS (x) CLR 


CLOAD “” 


LOAD "",8 


? CHRS (x) с 


CLEAR х 


[esses [rem | > | 


SINCLAIR - ZX SPECTRUM 


TEXAS INSTRUMENTS 
ТІ 99/4A 


THOMSON - T07 


- 7 CHR$ (x) 


LR 
Ше) 


LOAD  ”, 1 


LO; 


"CLOAD “” 


LOAD “" 


LOAD “”,8 сїз 


10, CLS 


CLEAR 


LOAD е” 


CALL CLEAR 


? CHRS (x) CDBL (x) 


1 CHRS (x) - 


LOAD“ "” 


CODE 0) 


CODES (х) 


ALICE - MATRA 
MC 10 - ТАМУ 


ÉQUIVALENCES DES INSTRUCTIONS BASIC 


Définition 
d'une fonction 
mathématique 


Conversion 
angulaire 


APPLE Пе 


H COLOR x 


C SAVE “x” DATA x, y, 


ATARI 600 XL/800 XL/400/800 


CONT 


COLOR x 


C SAVE " 


ES DATA x, у, 


ATMOS - ORIC 


C SAVE "х" 


DATA x, y, 


COMMODORE 64 


CONT 


COS (x) 


SAVE "x" | SAVE "x", 8| DATA x, y, 


DEF FN x = 


COMMODORE-VIC 20 


CONT 


COS (x) 


SAVE “x” DATA x, y, 


CONT 


COLOR T x 
COLOR G x 


Cos (x) 


SAVE “x” SAVE “x” | DATA x, y, 


DRAGON 32/64 


CONT 


CLS x 
COLOR x 


COS (x) 


- DATA x, y, 


DEF FN x = 


ELECTRON ACORN 


BBC moudèle B _ COLOUR x _ DATA x, y, | DEF FN x = DEG (x) 
HECTOR HRX - BASIC Ш CONT COLOR x _ DATA x, y, | DEF FN x = _ 
LASER 200/300 et 500 CONT COLOR x COS (x) С SAVE "x" _ DATA x, y, _ _ 
CONT LE x cos с de SAVE “x” | DATA x, у, - - 
CONT INK x COS (x) С SAWE "х" - DATA х,у, | DEF FN x = _ 
SINCLAIR - ZX 81 _ a COS (x) SAVE “x” _ _ = ج‎ 
SINCLAIR - ZX SPECTRUM CONTINUE INK x COS (x) SAVE “х” _ DATA x, y, | DEF FN x = - 
IMS SEIS UMEN E COLOR x, y COS (x) SAVE “x” - DATA x, y, | DEF FN x = - 

— ا‎ 
THOMSON - T07 CONT COLOR x, y COS (x) SAVE “x” SAVE “x” | РАТА х,у, | DEF FN x = _ 
COLOR x, y COS (x) SAVE " _ DATA x, y, | DEF FN x = DEG 
[де | ا‎ 5252252 |72. 


ÉQUIVALENCES DES INSTRUCTIONS BASIC 


ORDINATEURS 


ALICE - MATRA 
MC 10 - TANDY 


APPLE Ile 


ATARI 600 XL/800 XL/400/800 


ATMOS - ORIC 


COMMODORE 64 EXP (x) = 


COMMODORE-VIC 20 


DRAGON 32/64 FIX (x) _ 


FLASH 
HECTOR HRX - BASIC Ш EXP (x) FLASH x, y 


LASER 200/300 et 500 EXP (x) 


EXP (x) ROUND ON 


SINCLAIR - ZX 81 


SINCLAIR - ZX SPECTRUM 


TEXAS INSTRUMENTS 
TI 99/4A 


THOMSON - T07 
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ORDRES BASIC Conversion de 


ÉQUIVALENCES DES INSTRUCTIONS BASIC 


ORDINATEURS nil Ka KZ ve) WO | vao ment 
ІШСЕ d MM - IF-THEN ES INKEY $ INPUT INT (x) 
APPLE e - IF-THEN pars GET x$ INPUT nr о INVERSE | LEFT aa 
ATARI 600 XL/800 XL/400/800 e IF-THEN ERN - INPUT INT (0 = x$ (AS,x) 
ATMOS - ORIC GET x$ INPUT INT (x) - LEFTS (x,y) 
COMMODORE 64 GET x$ INPUT INT (x) = LEFTS (х,у) 
COMMODORE - VIC 20 D GET x$ INPUT INT 0) LEFTS (х,у) 
E GETCx$ INPUT INT (9 - LEFTS (x,y) 
DRAGON 32/64 HEXS (x) IF-THEN дару INKEYS INPUT INT (x) e LEFT$ (x,y) 
ee SE? INKEYS INPUT INT (9 PLOT ҳу | LEFTS (s.y) 
HECTOR HRX - BASIC Ш HEXS (x) IF-THEN D INKEY$ INPUT INT (x) INVERSE LEFTS (x,y) 
LASER 200/300 et 500 тану INKEYS INPUT INT (x) INVERSE | LEFTS (x,y) 
ЕЕ 
LYNX au KEYS INPUT INT (s) = LEFTS (х,у) 
ORIC 1 HEXS (x) GET x$ INPUT INT (x) _ LEFTS (x,y) 
SINCLAIR - ZX 81 INKEYS INPUT INT (x) INVERSE = 
SINCLAIR - ZX SPECTRUM INKEYS INPUT INT б) INVERSE = 
Brem DETIENE IG 2 
THOMSON - T07 INKEYS INPUT INT (9 = LEFTS (x,y) 
овса INKEYS INPUT INT (x) _ LEFT$ (x,y) 
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ÉQUIVALENCES DES INSTRUCTIONS BASIC 


Nbre caract. 
d'une chaîne 
alphanumérique 


ORDINATEURS 


ALICE - MATRA 
MC 10 - TANDY LEN (05) LET x = LOG (x) ON x GOTO _ РЕЕК (х) ЗЕТ (х,у) 
APPLE IF LEN (x$) LETx = LOG @) ON x GOTO _ РЕЕК (x) PLOT (x,y) 


ATARI 600 XL/800 XL/400/800 ON x GOTO PEEK (х) PLOT (х,у) 


ATMOS - ORIC LEN-(x$) ON x GOTO CURSET (x,y) 


COMMODORE 64 ON x GOTO. PEEK (x) 


COMMODORE-VIC 20 LEN (x$) LET x 


LOG (x) ON x GOTO _ PEEK (x) 


DAI LEN (x$) LET x 


LOG (x) ON x GOTO 


DRAGON 32/64 LEN (x$) 


PEEK (x) PSET (x,y,z) 


ELECTRON ACORN 
BBC modèle B 


LEN (x$) ON x GOTO PLOT (х,у) 


HECTOR HRX - BASIC III LEN (x$) РЕЕК (x) PLOT (x,y) 


LASER 200/300 et 500 LEN (x$) 


PEEK (x) SET (x,y) 


LYNX f LEN (x$) LET x = LOG (x) - OUT x,y 


LET x 


LEN (x$) 


РЕЕК (x) POKE x,y 


ORIC 1 LEN 6 PEEK (x) | CURSET (x,y) 


SINCLAIR - ZX 81 PLOT (x,y) 


SINCLAIR - ZX SPECTRUM LEN (x$) PEEK (x) PLOT (x,y) 


TEXAS INSTRUMENTS 
TI 99/4A 


CALL 
MCHAR (x,y) 27 


LEN (x$) LET x ON x GOTO 


LOG (x) 


THOMSON - T07 LEN (x$) PEEK (x) PSET (x,y) 


PEEK (x) PSET (x,y,z) 


ÉQUIVALENCES DES INSTRUCTIONS BASIC 


ORDINATEURS 


ALICE - MATRA 
MC 10 - TANDY 


M TAB (x) 
V TAB (у) 


ATARI 600 XL/800 XL/400/800 | POSITION x, y 


ATMOS - ORIC PRINT AT x, y| 


COMMODORE-VIC 20 


DRAGON 32/64 


PRINT" | PRINT USING 


RESTORE 


PRINT USING 


RESTORE 


HECTOR HRX - BASIC Ш CURSOR (х,у) 


PRINT USING 


PRINT: PRINT USING 


RND (x) 


PRINT @x, 


PRINT“ | PRINT USING 


RND (x) 


RND (x) 


PRINT USING 


RND (x) 


SINCLAIR - ZX 81 


PRINT USING 


RND (x) 


REM 


SINCLAIR - ZX SPECTRUM 


READ x REM 


PRINT“ | PRINT USING 


PRINT“ 


RND (x) IE 


jm 
RND (x) [е сак REM 


RND (x) 


READ x 


REM 


EQUIVALENCES DES INSTRUCTIONS BASIC 


d'une Sinus ў еп сошз 
ORDINATEURS variable d'exécution 
(EE MATRA: RIGHTS (x$,y) | POINTS (x,y) | SGN O) SIN (9) SQR (x) ЗТОР STR$ (x$) 
ا‎ 
APPLE II RIGHTS (х5,у)| SCRN (x,y) | SGN (s) SIN 6) SQR (s) STOP STRS (x$) 
ATARI 600 XL/800/XL 400/800 = z$ SGN (s) SIN () SOR () stop STRS (x$) 
ATMOS - ORIC RIGHTS (x3,y) | SCRN (у) | SGN (x) SIN б) SQR (x) 8ТОР STRS (x$) 
COMMODORE 64 RIGHTS (x$,y) _ SGN (v) SIN (s) SQR (9) STOP STRS (x$) 
COMMODORE-VIC 20 RIGHTS (x$,y) E SGN (s) SIN (s) SOR (v) STOP STRS (x$) 
RIGHTS (5,9 | SCRN (xy) | SGN (0 SIN б) SORO STOP STRS (x$) 
DRAGON 32/64 RIGHTS (x$,y) = SGN (s) SIN (x) SQR (x) STOP STRS (x$) 
ere ACORN RIGHTS (x$,y) | POINT (x,y) SGN (x) SIN (x) SQR (x) STOP STRS (x$) 
HECTOR HRX - BASIC II | RIGHTS (5,5) | POINT (қу) | SGN (0 SIN б) SQR (x) STOP STRS (x$) 
LASER 200/300 et 500 RIGHTS (9,5) | POINT (у) | омо) SIN (s) SQR (v) STOP STRS (x$) 
RIGHTS (x$,y) = SGN (9) SIN (s) SQR (s) STOP STRS (x$) 
RIGHTS (5,3) | SCRN (Xy) | SGN (0 SIN (x) SQR (0 STOP | STRS (x$) 
SINCLAIR - ZX 81 RIGHTS 65.) _ SGN (9 SIN б) SOR (v) STOP STRS (9) 
SINCLAIR - ZX SPECTRUM | RIGHTS (5,5) | АТТА (x;) | SGN SIN 0) SOR 0) STOP STRS (x$) 
TEXAN INSTRUMENTS = E SGN (x) SIN б) SQR (s) STOP d STR$ (x$) 
RIGHTS (3$) = SGN (s) SIN (s) SQR 09 STOP STRS (x$) 
Tes tm 
ERO ӨС 2999 RIGHTS (x$,y) =» SGN (x) SIN (x) SQR (s) STOP STRS (x$) 


SEGA SC 3000 


ÉQUIVALENCES DES INSTRUCTIONS BASIC 


Fin 
de boucles 
ады conditionnelles 

ALICE - MATRA 
MC 10 - TANDY TAN (x) = | _ _ VAL (x$) 
APPLE I TAN (s) TEXT 3 = VAL ($) WAIT x 
ATARI 600 XL/800 XL/400/800 TAN (v) GRAPHICS E - VAL (5) - 
ATMOS - ORIC TAN (9) TEXT = UNTIL (v) VAL (x$) Е WAIT x 
COMMODORE 64 TAN (x) zm TIS £ VAL (5) WAIT x,y,z 
COMMODORE-VIC 20 TAN (0) = = = VAL (x$) WAIT x,y,z 

TAN (v) MODE (9) = = VAL (x$) WAIT x,y,z 
DRAGON 32/64 TAN (x) = TIMER = VAL (x$) - 
ELECTRON ACORN 
ох TAN (9) MODE (9) TIME UNTIL б) VAL (x$) - 
HECTOR HRX - BASIC Ш TAN (v) E т = VAL ($) - 
LASER 200/300 et 500 TAN (s) MODE (9) = E: VAL (8) - 
LYNX TAN (v) _ É - = VAL ($) PAUSE х 
ORIC 1 TAN (x) TEXT z UNTIL (9) VAL ($) WAIT x 
SINCLAIR - ZX 81 TAN (s) = | E = VAL (xS) | PAUSEx 

“| E 
SINCLAIR - ZX SPECTRUM TAN (v) x = = VAL (x8) PAUSE x 
TEXAS INSTRUMENTS Г 
“IESS TAN () “ E = VAL (x$) => 
= — 
THOMSON - T07 TAN (x) 2 E еш VAL 05) = 
SS ТАМ (x) SCREEN 1,1 = VAL (x$) 2 
z - JE. 


Tous les jeux de = © 


Egalement disponibles sur cassettes et disquettes 


BON DE COMMANDE 


Mettre une croix dans la (les) case (s) correspondant à votre choix. 


=> 
CASSETTES 4 
(5 jeux par cassettes) : б G 8 * 
50 F T.T.C. l'unité. 5 - DAI 9 - Oric 1 14 - TO7 
- Ali Ў 5.0.5. Nicht Track Boopy 
1 Allice МО 10 Saut en longueur Oric Briques Parcours 
desen Intergalactique Altitude 0 Nuclear 
E Le pigeon agile Longchamps Duel 
on Lo Miniwar Tiltman Les tours infernales 
L'Attrappe 
Réflexes 
2 - Atari 800-400 10 - Sega-Yeno SC 
600 XL-800 XL | 6- Hector HR 3000 15 - VIC 20 
Saut de haies Crazy Bang Formule 1 Labyrinthe 
Les bons bonds Anglomanie S.O.S. Lune Raid sur New York 
Prof La pétanque Torpilleurs SODRET 
Girobattle Alphabétophage Mission survie Schuss 
Chasseur La chenille Othello Laser Omega 
16 - ZX 81 
3 - B.B.C.-Electron | 7 - Laser 200/210 11 - Spectrum Zig Zag 
Puissance 4 Tchouka Crashtown La maison du savant 
Mille-pattes Squash Cars fou 
Smokkar Le phoque Hop hop! La résidence secon- 
Prison Car Fight Bomber daire du savant fou 
Les chenilles L'âne rouge Helicos Appontage 
4 Glouton 
L SC s 
À DISQUETTES 
4 -Commodore 64 | 8 - Lynx 12 - TI 99/4A BI 
Vampires Moutons Météores Ii- He 
Le Kid Gourmand Racing 2 Apple-ll - II 
Helicruise Beyrouth Capricorne Two Kamikaze 
Starfall Papillon Master Alcool test 
Shadow Les folles haies Ludicourb Er 
tock car 
702 en péril 


Faites votre total et ajouter 10 F de port pour la France et 20 F de port pour l'étranger et les 
DOM-TOM. Le règlement peur s'effectuer soit par chèque bancaire ou postal, soit par mandat à 
l'ordre de: D.D.I. 

Merci de retourner ce bon de commande accompagné de votre réglement sous enveloppe affranchie 
à D.D.I. - Centre d'Affaires Paris Nord < Le Bonaparte » 93153 Le Blanc-Mesnil. 


M. Mme Mile 
Мот: Ргёпот: 


Adresse : 


Code Postal | | | | | | Ville: 
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— 


ALK 


MCIOTANI 


PUISSANCE 4 


Voici un jeu de réflexion à perdre la téte. 
Le théme est assez classique, mais l'aspect de la grille est déroutant. 
Vous jouez contre la machine, alors faites bien attention, 
car aucune erreur de tactique n'est permise. 


BUT DU JEU ] 


Chaque joueur dispose d'un nombre de 
pions illimité.-Le but à atteindre est sim- 
ple. Il faut aligner quatre pions, dans n'im- 
porte quelle direction. Mais vous ne pou- 
vez pas mettre votre pion n'importe où. Il y 


a sept colonnes et vous ne pouvez les dé- 
poser que l'un au-dessus de l'autre. 1 est 
donc impossible de mettre un pion dans la 
colonne 1 au niveau 1, et au tour suivant 
dans la méme colonne mais au niveau 6. 


AU CLAVIER 


Pour placer un pion, il suffit d'indiquer à 
l'ordinateur la colonne choisie. Il s'occupe 
du reste : affichage du tableau destiné à 
visualiser le jeu, et détection du joueur 
gagnant. 


1 CLS: CLEAR 

3 REM COFYRIGHT TILT MICRO 

5 FORX=1T07:UCX)=417:NHEXT:X=0 
14 DIMRCES) 

SG PRIHTe228."**X** PUISSANCE-4 
XxXxXx"::FORU-iTOSGGH:MEXT 

188 PRINTBE23B,"PLUISSRHCE-4" 

134 GOSUE1 OHARA 


THENR¢ 1@0Ж0-1@›=1 
SANDE=ØTHENX=0: Y< X Ass Xx 


MECAXAO:PRINTRYCHRO, "x"; :SOUNDSB, 

4 

S58 IFM=1SANDE=GTHENPRINTES 
esci PERDU -----": SQUND40,4: 

SQUHDS8,4:FORU=1T0300808:HEMT:GOTO 

ism 

488 N=H+RÇC61+M): RETURN 

зай Sti: IFÉZ 236THENRETURH 

6й@ SOUMDiGB,3:PRIMTG18," MATCH 

HUL !!!": SOUNDER, SOUNDI66,4:F0 

ЕШ-1Т 


ғай 
8A4 RCOD=RCOD+1:R 
Э@й RCIBEO-187 
Р=ЙТНЕНН=-1 : RETURN 

1464 IFPF<>STHENM=6:FORH=1T04:G=1 
2:60т095ӣй 

1208 IFP»-1THEHM-B:FÜüRH-2T05:6-1 
4‹бйтпэ5@ай 

14йй E= B: IFÜS4THEHE-ü-2:F-4 
1600 FORD=ETOF :M=@:FORG=DTOD+3:M 
=М+ЕСРЖ1й+С› 

165@ HEXTG : GOSUBZAA : NEXTD 

1864 A=P+0 

1858 IFP<>SANDR>=SANDA<=8THENG=1 
ЕЕ ИЗ 


LEE 


F 


2666 IFP<>IANDA>=6ANDA<=9THEN 
: GOSUBS5GG 


2264 Н=0-Р 

24080 IFP<>SANDA>=GANDAS=3THENG=& 
: CGOSUBSAGA 

2664 IFP<>1ANDA>=-1ANDA<=2THENQ= 
я: GOSUBESAA 

2888 RETURN 

3500 Есвво-ійайй 

S688 R<(61 
3681 
3642 
3643 
S684 


ЕС64о-1йай 
Free 
3645 R(71)=100 

S686 ЕС76Є)=1@ййй 

3844 G Esas 

4000 B$=INKEY$:PRINTES, " v 
OTRE COLONNE : ?" 

4200 IFB$<"1"0RB$>"?"THENH4B800 
4388 B=VALCE$) 

4466 GOSUE12888 

4688 O=6:IFRCO)=5STHEN4GGG 

4800 L-1:GOSlB?88:IFRCLGXO0-18221 
THEHPRINT@3," ЖЖЖЖЖ FELITITATIO 
:FORE=14T02@@ : SOUMDE , 1: 
=1T02000: NEXT: GOTO13686R 
BSBA: FüRO-1TU?: 
GOSUESGG :IFH> ‘Leg 

S244 HEXTO:0=L 

5400 L-5:GOSUB?BB:Bz1:GÜSllBSBg:T 
FRC18#0-162)=1THENEGGE 

5864 GUSUB12166:G0T03884 

6@@й FORK=GTO ü*5:I-K-PTXINTCKZ? 2 
+1 

6166 IFI=LTHENK=16:NEXT:G0T05866 
6266 IFRÇID=STHENHNEXT : GOTOSSGG 
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6488 ЕССР+12Ж1@+0)=й 
6458 RCODO-RCDO-I:GOSUBSBa:OsI:K- 
16:NEXTK 
взай GOTOS400 
M=6:FORH=1T04:G0T098664 
FORH=2TOS 
эёйй G=A-H:1FG=8THENG=H+H+G 
3108 MeM*RCIBEH*GO: NEXT: GOSUBZGOB 
| “КЕТПЕН 

9588 M-M*RCIGXHE0O:HEXT:GOSUBZGG 
за. GOSUE208 


11209 SET ds, T, 52 
11388 5ЕТ(55,Т,59 
11400 SET(63,T,:5) 
11588 HEXT:SOUHD?6.2:SO0UHD158.2: 
SOUNDZ15,2 
11600 T=480 
11700 FORS=1TO7 
11750 T=T+4 
11800 РКІНТӘТ,5; 
11900 :NEXT:RETURN 
1їг@айй :GüTO122ü88 


|28708 TFG-14THEN1408 12100 

"IT авай IFG=12THEN12080 12208 YCMO-UCKORCAKXO 
1йййй IFV-STHEN120808 s 12250 PRINTES," " 
10058 vesrcLse:SOUND288,3 12300 LEXCHOGISSTHENRE TURN - 

en 4e188 FORSE7TO6S 12858 PRINTeYCHO.H$; 
18288 SETCS.31,5) 12378 SOUNDi58.2 nen S 
18388 SEI 88,52 12488 UCHOZUCK)-64 
18488 SET(S, 29,5) 12588 RETURN 
10500 NEXT | 12000 PRINTEZ," UNE AUTRE 
10660 FORT=6T023 PARTIE 7" x 
18788 ФЕТС?7Т,5» 13188 р$=1НКЕҮ `" 
18888 SETC15, T5) 13208 1FD$="N"THENÔLS : END 
18988 <ЕТ(23,Т,5» 13348 IFD#=""THEN12006 
11888 SETC31,T,S) 13488 GOTO1 
11188 SEI Sa, T, 5) E x 


Sa TIC-TAC-TOC 


Ce logiciel est une adaptation du célèbre j jeu de Morpion, 
bien connu des éléves. Mais ici, vous n'avez besoin q 
que d'un ordinateur et d'un écran de télévision. 


ІШ 
ы ду 


BUT DU JEU ne suffit pas d'aligner vos propres pions, il pour placer votre pion sur l'une d'elles, 
Vous jouez contre l'ordinateur. Le vain- faut aussi arrêter le jeu de l'adversaire. pressez la touche correspondant à ce 
queur est celui qui aligne horizontale- nombre. Votre pion se place tout seul, et 
ment, verticalement ou diagonalement AU CLAVIER ainsi de suite jusqu'à la fin de la partie. 
trois pions identiques. Méfiez-vous car il Chaque case est numérotée de un à neuf, 


Jg REM COPYRIGHT TILT MICRO 
5 CLS:X=3:B=128:D=32 

i8 ОНТН?4,80,85,234,239,241,245, 
$94,299,481,4805,1 

ЕЙ DATA7S.75.86.87.233. 235. 240.2 
46.247.393. 395, 400, 406, 407. 2 

зй DRTR1508,151, 272: 310,311,464. 4 
78,471,438,439,3 К 
48 RERDR 

S8 FüRCZiTOX 

Sp IFRESTHEH118 

76 PRINTER, СНЕСЕ: 


Sp A=A+D 


96 NEXT С 

188 бОТО1й 

118 IFR=1THEHD=0:B=131]:%5=1:GüTO2 
8 

128 IFA=2THENE= 148: СОТОЗӢ 

138 IFR-3THENSÜOUHD1BB,4 

148 F6RU=1TO1008:HEXT:GOTOSQQ 
SGG CLS:E-13:C-74:S0UNDZRR, 4 

510 C=C+1 

520 SETCX,C,32 

S538 SETCE412.C, 2) 

948 SETCX424,C, 32 

5586 SEI virze, C. 3) » | 


Е 


Dep IF ВТНЕН58й | 


1288 IFY<STHENRETURH 
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576 6070510 

588 SET(X,4,3) 

598 SETCH, 12.32 

688 SETCX, 28,32 

618 SETCX,28,3) 

628 H=H+1 

638 IFX-49THENC-B:GOTO65B 

648 GüTO588 

658 DATA 1780.176,182,298,384,318 
:426,482:438, 1 

668 C=C+1 

678 RERDR 

680 IFR-1 THEN SQUND288,4:GOTO18 
EI 

698 PRINT@A-1;ABSCC); 

тай с0Т0658 

1888 CLEAR:DIMZC30) 

1828 Т-2:6050в1340 

1825 Y=6:T1=9:1FN=1THEN1658 
1838 605ив148а:б051в1348 
1935060508147: GOSUB1486 
1848 GOSUB10706:GOSUB1408 
1845 GOTO184AÀ 

1858 PRINTGS, "ЈЕ COMMENCE 
=1Т02@@й:НЕХТ 

1855 GOSUBI1340:GOSUB1470 
GOSUB1 400 :GOSUE1 340 : GOSUB1 4 


": FORU 


GOSUB1400: GOSUE107A 
бптп1йвй@ 

K=B:L=Y:Y=Y-1` 

IFS=3THENY=L 
K=K+1 : GOSUB 1568 

N=1@+M 

FORA=1T09 3 
IFR-H-18THEH1128 
IFZCN)D=2€16+A)THENR=45-A-N- 
18: I1FR>1GANDR<ZGTHEN1 166 

1128 NEXTA 

1188 IFS=3THENRETURN 

1148 IFK=2THEH1240 

1154 GüTO1238 

1168 IFY>=9THEN1258 

1178 ІҒЕ-МТНЕН1120 

1188 IFR-184RTHEN1128 

1198 IFS-STHEN1268 

1288 IFZCROSBTHENYsL*1:2CYO-R-18 
:U-1:GüTO1388 

1218 IFS=3THENRETURH 

1228 IFACSTHEN112@ 

1238 IFKe1THENY-L:GOTO1GSÀ 

1848 Y-L:GOSUB1348:GOSUB1478 
1245 ІҒҮ<ЭТНЕМЕЕТШЕН 

125@ PRINTG1G. "MATCH HUL 111": SQ 
UND1GB,3:SO0UND138,3:SOUND168, 3:F 
üRG-1Tü2888:HEXT:GOTO1888 

1255 GOTOS 

1268 IFZCR*182-22CRORHDK-1THEN131 
ü 
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D IFS=3THEH11280 


1298 
1366 
1385 
1318 
1315 
1328 
1348 
1356 
1355 
1360 
1376 
1386 
1396 
1488 
1485 


1419 
1415 
< 


FORA=1TOY 
IF0=JCR)THEN1416 
NEXTR I 
ZCY 20: IFY-55THENGOSUB1476: 
$28:GOSUB1870:Y-L: S58: RETURN ` 
1468 GOSUB1478:RETURN 
1478 GOSUB1568:E 
1475 1Еб=5ТНЕНВФ 
1488 Z(18+M)=M 
1485 A$CZCY SES 
1498 РЕ1НТ@й," " 
1588 IFO=1THENE=137 
1585 ТЕП=2ТНЕМЕ=143 
1518 IF0=3THENE=149 
1515 IFO=4THENE=265 
1528 IFO=STHENE=271 
1525 IFO=6THENE=277 
1538 IFü-?THENE-393 
1535 IF0=8THENE=399 
1548 IFZ(Y)-9THENE-4805 
1541 IFZCY)=1THENE=187 
1542 IF2(Y)-2THENE-143 
1543 IFZCY)=3THENE=149 
1544 IFZCY)=4THENE=265 
1545 IFZ(YO-5THENE-271 
1546 IFZCY)=6THENE=277 
1547 IFZCY)-7THENE-393 
1548 IFZCYO-8THENE-339 


1549 


-z1TüUiS588:NEXT:GQ-5 


1558 
1568 
1570 
1586 
1590 
Leon 
1610 
1620 
1636 
1648 
1645 
1656 


=1T02866:NEXT 


:G=S:G0T01420@ - 


GOTO1Z25A 
GOSUB15608:G0SUB14786 
GOTO1268 

C$=" J'AI GAGNE !!" 
IFS-STHEHC£-"J^RI PERDU 
PRIHTeS,C£:GOTO17ü88 
Y=Y+1 

N=RND¢ T 2 

IFY<2THEN ZCY)=N:RETURN 
FORA=1TOY-1 
IFH-2CROTHEH1358 
МЕХТА 

ZC YSN: RETURN 

Y=Y+1: IFG=STHEH1448 
PRINTe180;" ñ VOUS ... 


"FORG 


S$-INKEYf 
IFS$«-"S"RHDS$?"n"THEHü-VRL 


50101419 


SQUND125,1:FPRINT@E, E$; :FÜRG 


RETURN 

507015704 

1Е2СҮ )=2THENW= =9 

IF2CY ›=ЗТНЕНМ=6Є:2=4 

IFZCY)=4THENW=3 : 2=7 
=5 
=3 
=6 
=1 
=8 
=2:E=137 


1666 u-ü 
1676 RETURN 
1700 FORU=1iT015:SOUNDUX16,;2:HNEXT 


D$=INKEY$ : 
IFD$-"H"THENCLS:END 
:FÜRU-1TO1588:NEXT: CLEAR: GOTO188 IFD$-""THEH198B 

а GOTOS 

1888 PRINTES," UNE AUTRE PARTIE 


JACK POT 


Vous avez toujours rêvé de «flamber» à Las Vegas. 
Et bien, tout est possible 
avec votre ordinateur. Pourquoi ne pas tenter votre chance 
devant une machine à sous ? 
C'est votre micro qui règlera la note !!! 


BUT DU JEU 


Vous devez à partir d'un capital de cent 
dollars gagner le plus possible. Misez, 
mais pas trop, car votre bourse s'épuise 


trés rapidement. Faites bien attentioncar même opération pour toute nouvelle ten- 
vous risquez de vous retrouver les poches tative: Vos guna sont en rapport avec la 
'sultat du jack pot. 


vides, et de rentrer chez vous à pied. 


1 CLS 
3 REM COPYRIGHT TILT MICRO 
5 GOSUB1100:B=0 


6 CLSS:SOUND80,3 

18 DRTR103,104,105,135,137,167,1 
68,169, -1 

28 RERDR 

88 IFR=-1THEH100 

dp PRINTGR*B," "; 

sa GOTO1@ 

100 B=E+4 

118 RESTORE 

128 IFB>19THEN140 

138 GOTO10 

144 FüRR-6TOSS 

150 ЗЕТ<Н,16,32 

160 SETCA. 26,3) 

165 A=A/2:PRINTCR+288, CHR#C 1509; 
:R=Rx2 

174 A=A/2:PRINT@A+2352, СНЕ 150); 
:R=Rx2 

188 A=Ĥ7/2:PRINT@A+384, CHR$C 150); 
:R=R*2 

185 A=A/Z2:PRINTER+326,CHR#C 1432; 
«Н-Нж2 

198 NEXT 

200 f-237:B-59 


214 FORE=ITO6 


mise et le rt 


AU CLAVIER 


— Pour déclencher le jack pot, il suffit de 
miser entre 1 et 99 dollars. Ensuite l'ordi- 
nateur se charge du reste. Refaites la 


- Voici les sommes gagnées suivant les 
sorties du jack pot : 


R=R+32 : B=B+32 
PRINTER,CHR#C 149); 
PRINT&B,CHR$C1542; 

NEXT 

FORA=37T059 
РКІМТӘНЯ,СНК%< 2049; 

НЕЯТ 

FORA=198T0218 
PRINTEA, СНЕ 159); 
PRINTER+32, CHR#< 159); 
PRINTCA-128, CHR$C 159); 
NEXT 

FüRC-1TO6 

D(C )=98+( 4XC > 

ECC )=132+C( 4ЖС) 
PRINT@DCC),CHR$(159)5; 
PRINTEDCC)+32, CHR$C 159); 
РКІНТФр(С2%64,СНК%С 1599; 
IFC=6THEN406 
РКІНТФЕСС2,СНК%< 1432; 
NEXT 

FORA=458T0478 

PRINTER, "£"; 

PRINT@A+32, "-"; 

NEXT 

FORA=258T0418STEP32 
PRINTER: CHR$C 2022; 

NEXT- 


[ asa FORA=286T0446STEP32 967 IFG$CPO»"S"THEHSSÉ 
496 РЕІНТЕЯ, СНЕС 19790; 968 IFG$CP)<"1"THENSSG 
500 NEXT 988 PRINT&4?74,ü$CP 5; 
510 FORU=ITO4G : SOUND228, 1 :NEXT 882 NEXT 
S28 CLEAR 985 FORA=456T0477 


52 


570 B-B:D$-IHKEYS 

588 PRIHTRSES," MISE:";B; 
590 IFbD$>"9"ORD$<"1"THENS76 
595 PRINTe323," MISE: ";B; 
644 B=VALCDS)*ia 
PRINHT@331,B; 

626 U=U-B 

634 PRINTO337, "RESTE: "iU: 
656 Е%="#%@ЖО+":Н=5 

655 Н-Нж1:ІЕН>ЕТНЕН6Ей 

664 FüRP-1TOS5:IFVRLCG$CP22-HTHEH 


665 NEXT 

674 CCHI=RNDC6):GO0T0655 

ESD PRINT?136,MID$CF$.CC10,12; 
СЭЙ PRINT?148,MIDS$CF$,CC22.12; 
PE PRINTG144.MIDECF$,CC3).1); 
тій PRINT?148,MID$CF$,CC4). 12; 
728 PRINTe152,MIDfCF$,CC52,12; 
т22 SOUND245,1 

РЕЗ Н-й 

736 IFI=1STHENFEG 

T4B I=1+1:G0T066@ 

764 FORK=ITOS 

765 FOüRP-1TUS:Qf$CPo-"X":NERT 

FTO L#CKO=MIDSCF#, ССК, 1) 

786 NEXT 

тай IFL#C1)=L#HCEZ DANDL#C1)=L#C30A 
HOLE 1 = 04 JANDL $C 1 22L $< S )THENW 
z18:FüRR-1TOS:SOlHDiSG,2:NEXT:GO 
T0856 

SGG IFL#C1)=L$C25RHDL$C1)=L#$cC3)5B 
HDL$C1 )=L $< 4ЭТНЕМИ-5:ЕОЕН-1704:5 
OUNDISG,2:HEXT:GOTO85@ 

S18 IFL#C1)=L#CE DANDLS#C12=L#C30T 
HENH=2 : FÜORA=1TOS : SOUNDIS@, 2: NEXT 
: GOT085A 

S28 IFL$(1>=L$(2)THENH=1 :SOUND15 
6. 2: SOUND1 SA, 2: GOTOSSA 

8308 IFL#C1)="R'THENY=1 

зай сатазай 


S58 IFL$C1)="#"THENX=5S: GüTO app 
Sen IFL$CIO-Z"R"THEN ватозай 
870 ІРІ %(12-"П"ТНЕНХ-з:батозйй 
886 I1FL$C19="X"THENX=1:GOT0O986 
894 x=2 

зай XX: S=B*£Y:U=U+S 


965 H=0: =й 

918 І-й:ІҒС(62<ЗТНЕНЗӘЗй 

926 GOTOS?ü 

354 PRINTG454, "QUE CONSERVEZ VO 
us ze 
935 UHD188,2:SQUND118, 3 
S48 FORF=ITOS 

956 Gf£CPO-IMKEYÉf 

зей ІРОФСР у=" "ТНЕНЭ5Ӣ 

965 IFüf$CPo-" "THENSSS 


987 PRINTGA; "Ж"; : NEXT 

999 B-ü 

1666 GOTOS7G 

1166 CLS:SOUNDI25,2:SOUNDI 
1208 FORA=134T0153 

i258 РЕ1НТ@166,"Ж":РЕ1НТ@1 


13060 PRINT6158,"x";" J 
Т"; :PRINT@217, " 
1488 PRIHTe238, :PRIHTEZ 


1588 РЕ1НТ@2Є2,"Ж";" 
:PRINTe281,"x" 

1600 РЕ1НТ@294,"Ж":РЕ1НТ@З 
1700 PRINT&326,"x";" LA 
S 1"; :PRINTES45, "x" 

1880 PRINTE3SS," :PRINTES 
1900 PRINTEA, "x" 

1958 PRINTEAR+256, "x" 

2666 NEXT :SOUND11@, 2: SOUND 
2100 FORU=1T04000:NEXT 
2288 SOUNDI25,2:SQUMHD118,2 
2258 CLS 

2388 РЕ1НТ@З?,"ЖЖ MULTIFLI 
5 xx" 

2488 PRINTe3S,"$$$$$:50 # 
в 00000:36" 

2500 PRINTe138,"$$$$ :25 
15 0000-:15" 

2688 PRINTG162."$$$  :1ü 

6. 000476769 

2700 PRINTe194,"f$ 45 

з 00 gn 

2888 PRINT@290,"+++++:2ü 
20 xxxxx:18" 

2900 РЕ1НТ@З22,"++++ :18 
10 ЖЖЖ: 5" 


S888 РЕ1НТ@З54,"+++ : 4 
4 ЖЖЖ < 2" 
S188 PRINT?386, "++ 5 2 
2 ЖЖ бан. 


3388 FORU=1T06000:HEXT 
S488 SOUND125, 2: SOUND 14B, 2ã 
3500 RETURN 


22280 


18,2 


85, "x" 
ACK-PO 


49, "x" 
R"; 


is,"x" 
S VEGA 


Үлү: 


125,2 


CRTELIR 
Dunn: 3 
HHHH 
HHH 


## 


CRECE: 


Gg 


eee 


LA 
sco LATTRAPE 
[ы Un animal dangereux s'est échappé 
du zoo tout proche et terrorise la population. 
Vous ëtes chargé de rattraper 
le fauve au plus vite. 


BUT DU JEU 


Armé d'une sorte de filet, vous devez at- 

traper un animal féroce. Bien súr,celui-ci 
n'est pas de cet avis et fera tout pour vous’ 
échapper. Courez sans reláche et vous 
aurez peut-être la chance de le capturer 
assez rapidement avant qu'il ne tue une 


premier ? 


1 REM COPYRIGHT TILT MICRO 
18 GOSUB6SA 

15 CLS:SOUND138,2 

28 PRINT@235, "VITESSE : 7"; 
З@ PRINT@EZ99, "172737475"; 
35 D$=INKEY$ 


4й "1" THENV 
5a "THEN 
22) ТНЕНУ 


4"THENY=420 

"S"THENY= 518 _ 

85 R=YALCD#) 

98 IFD$>"S"DRD$<"1"THEH30 

188 ñ$#=CHR$C207):B$="o" 

185 CLSE 

118 X=224:Y=255 

128 C-RNDC4182*32: SDUHD188, 2 

125 S=S+1:1FS>STHENSGG 

138 IFC/32-INT(C/32)=ATHEN120 
148 IFC/31-1NTCC/31)=6THEN126 
145 PRINTGC;Bf; 

158 PRINT&X,Rf$4R$; 

168 PRINT&X432,R£; 

178 PRINT&X464, A$+A$ ; 

198 PRINT&Y-1.R8$4R$; 

288 PRINTRY432,R$; 

218 PRIMTRY«63,R$4R$; 

215 SOUHD24B.1 

228 F£-IMKEYS 

?38 IFF$-"R"THENX-X-32:CLSE: IFK< 
BTHENX-X422 

248 IFF$-"&"THENY-Y-32:CLSE:IFY4 
BTHENY-Y«32 

258 IFF$-"O"THENX-N*32:CLSE:IEM? 
416THENX=X-32 

Sen IFFt="M"THENY=Y+32:CLSE:IFY> 
415THENY=Y-32 


population innocente. Vous êtes deux 
chasseurs de fauves, lequel réussira le 


- Ce logiciel est conçu pour deux joueurs. 
Les filets se dirigent à partir du clavier. 


Joueur de gauche : * А = haut 
zo 


joueur de droite : 


278 IFF#="X"THENX=X+1:CLSE:IFX=4 
1STHEHX-& 

288 IFF$="W"THENX=X-1:CLSE:IFX<0 
THENX=414 

298 IFF$-"."THENY-Y-1:CLSE:IFY«1 
THENY=415 

300 IFF#$ "THENY=Y+1:CLSE:IFY=3 
10RY=415THENY=384 

328 Н=Н+і : ІЕН=УТНЕМН=0 : С Е : GOTO 
120 

3308 IFF$=""THENZES 

356 IFCC-X)=3SANDCC-Y)=31THENFOR 
U=1T08 : SOUNDUX26, 3: С 50: NEXT: 0-0 
+1:H=6:CLSE:GOTO12@ 

368 5070145 

586 CLS:S-a 

514 PRINT@166, "Lñ PARTIE EST FIN 
ЗЕЛ» 

528 SOUND130, 2:FORU=1TOZGBA : NEXT 
S38 PRINT9?228,"VOTRE SCORE EST D 
E wie 

548. SQUND120,2:F0RU=1T02800:HNEXT 
55й РЕ1НТ@293,0;"/ 5 EM VITESSE 
NO" ;R; 

S64 SOUHDi38.2:FüRl-1TO2G888:HEXRT 
570 CLS 

588 PRIHTé238,"lIHE AUTRE PARTIE 
Ж 

585 SOUHD1206,2 

596 D$=IHKEYS 

6йй IFD$-"H"THEHCLS:EHD 

616 IFD$><""THENIS 

624 GOTOS96 

658 CLS:SQOUND130.,2 

664 PRINTG32."CHOISISSEZ VOTRE C 
DOULEUR DE FOND"; 
674 PRIHT&13&,"HOIR 


210); 


| 688 PRINTBi7TH,"VERT 527107 848 PRINTGF+64; "X"; 


E 
696 PRIHT&2ü2,.".IRUNE QUE 854 NEXT 
766 PRINT@234. "BLEU ا‎ 868 PRINT9184,"* L'RTTRRPE Ж" 
тій РЕІНТ®266, "ROUGE dod H 
r20 PRIHT@298,"CYRH SE 870 PRINT@263, "< R) z ce) 
ТЭЙ PRINT@330, "MAGENTA -> 7"; EF 
740 PRINTOSÉZ, "ORANGE. ET S88 PRINTE198, "TOUCHES DE DEPLRC 
756 FORD=426T0438 EMEHT"; 
Cep РЕ1НТ@р,"Ж";:НЕХТ 890 PRIHMTez95,"CQ»5 v CM? 
776 D#=IHKEYf a 
780 IFD#$#>"8"0RD#<"8"THEH666 S00 PRIHNT@327; "CW? 5 
796 IFD#="S"THEH660 2g 
844 E-VRHLCD£$) 918 PRINTG35S,"CX) => Ci) 
816 CLS: SOUND 38 Get 
S28 FORF=72T08 Sem FORU=1TO3AAA : HERT 
830 РБІНТӘР ЭЗ@ RETURN в 


a REFLEXES 


M Avant d'aborder les jeux d'action complexes, 
exercez votre habilité 
en détruisant une population d'envahisseurs 
toujours plus nombreuse. 


BUT DU JEU anéantir avant qu'ils ne soient devenus utiliser les touches suivantes : 


trop nombreux et ne prennent inévitable- ” WA = 2 cases à gauche 
Vous devez détruire des envahisseurs se ment le dessus. 1 case à gauche 
multipliant très rapidement à l'écran. - AU CLAVIER 2 cases à droite 
Pour cela, vous disposez d'un canon laser. 


1 case à droite 
Déplacez-vous de droite à gauche pour les - Pour déplacer votre carton laser et tirer, -~ * Space = tir 


J0-2:8z-2 


148 IFCC.OÓZ2RHDRC.ID423THEMHRE J =R 


E 1 REM COPYRIGHT TILT MICRO 
S CLS:GOSUB999:CLS 


ій 8й:П-й:Үсй (5.12%2:5-2 
LS B i58 IFCC J=3ANDEC J2> 3THENEC J?=BC 
zü So U PRETS T J)-2:$=-2 
34 D$=INKEY$ 166 Mu 4RNDEC.I24 SSTHEHEC J 3=B 
IFD$<>""THENEG (J)+2:S= 
GOTOZA 178 NERT 
CLSA 172 G=G-1:IFG=-1THEH900 
FORJ=1T03 174 РЕ1НТ@@," TEMPS G 


AC J )=RNDC 122+45 
IFACJID/E-INTÉ AC 12/2 >>ӨТНЕНҮЙ 
ECJ)=RNDé 64 2 

IFB¢ J?72-INT{ E J272 >>üTHEH8B 
Эй SOUHDBEC.IÓOX3.2 

144 NEXT 

185 FORU=1TO063STEP2:SET<CU,23,8)5 
SET<U,25,85:HEXT 

118 FORJ=1TOZ 

128 С(.1о2-ЕНр< 49 

i38 IFC6G.O-1RHDRC.I 223THEHRC 12-НС 


176 PRIHT*15," SCORE 
184 F$-INKEYf 
196 E 


ü 


METE E+4 
. "ANDE<61THENE=E+2 
"THEH415 


354 SETCBC2O,RC2ZO, 50: IFRCE2222TH 
EHCOSUBSAG 


54 


2 N 
S68. SETCBC2O, RC22, 12: IFRC22222TH 
EHGOSLIBERE 
384 ЗЕТЕ, 31,3) 
390 RESETCE-V, 31» 
488 GüTO11G 
415 SOUND2@@,2 
428 FüRP-28Tü2STEPF-1 
42? IFPUIHTCE.P-12»B8THEHSQUND1GGÓ 
,1:0=0+1 
438 SETCE,P,23 
448 НЕХТ 
458 FORF=38TO2STEP-I 
4680 КЕЗЕТ(Е,Р) 
478 NEXT 
558 GOTOiiG 
EAG IFAC12=24THENFORH=1TOS: SOUND 
136.1: NEXT:K=4:0=1:GOT0638 
614 IFACZ)=24THENFORH=1TOS : SOUND 
138.1: NEXT:K=5:C=2:G0T0636 
628 IFAC3)=24THENFORH=1T03: SOUND 
136.1: NEXT :K=1:C=3:G0OT0636 
625 RETURN 
638 T=RNDC 42 
640 IFE>BCCIANDT>ITHENN=62:L=2:F 
ORX=BCC )TONSTEPZ2:G0T0696 
656 IFE>ECC)ANDT=1THENN=E :L=2:F0 
RWSBCCOTO NSTEP£:GOTO63& 
664 IFE<BCCIANDT>ITHENN=1 :L=-2:F 
ÜRX=BC(C)TONSTEF-2:G0T0696 
ЕРЙ IFE<BCCIANDT=1THENN=E:L=-2:F 
ÜRK=ECCOTONSTEP-Z 
696 IFK>2THENRESET(X-L, 24) 
695 IFX>63THENX=62 
698 FüRR=1T02 
TOG SET<X,24,K)> 
FAS IFM<SORMK>6GTHENRESETCK, 24) 
T18 F#=INKEYS 
7264 IFF$=" "THEN750 
?22 HEXT 
725 HEXT:WzX-L 
746 IFT-1RHDH-ETHEHFÜüRH-24TO31:8 
ЕТЕН, M, K 2: NEST: FORH=1TOS : SOUND3@ 
11: HEMT: Y2Y1:FÜRM-24TO31:RESETC 
Н.М: NEXT: G0SUB986 : RETURN 
745 RETURN 
7564 FORM=31T024STEP-1 
Cen SETCE.M. 22 
Tre IFPOUIHTCE;H-1228THEHFÜRH-1TO 


5: SOUNDH#48, 1: NEXT: Oz USB: FORM=2 
4TUS1:RESETCE. М>: HEXT: RETURH 
788 NEXT 

796 FüRM-24TO31 

S88 БЕЅЕТСЕ, М> 

885 NEXT 

867 NEXT 

818 КЕТПЕН 

988 IFY>40RG=-1THENCLSG:SOUND15S6 
.S:GüTü0S28 

916 RETURH 

928 PRINT&G," TEMPS iG+i 

938 PRINT@15," SCORE :";0 

948 PRINT@224," FIN" 
956 FORU=1TO32666:HEXT 

960 PRINT@416," UNE AUTRE PA 
KEE Sen 

970 D$=INKEY$ 

986 IFD$="N"THENCLS:END 

998 IFD$-" "THENPRINT@416," ":GO 
Tüiü 

335 GOTO978 

999 CLS:SOUHD138.2 

1444 FüRR-135TO152 

1416 PRIHTGR,"x" 

18280 PRIHT@R+192, "x" 

1838 NEXT 

1848 ñ=167:B=184 

18608 FüRC-1TOS 

1878 PRINTER, "X"; :PRINT@B, "X"; 
18808 ñ=R+32:B=E+32 

1098 NEXT 

1895 КЕМ PRESENTATION DU JEU 
1124 PRINT@235,"REFLEXES"; 

1138 FORU=1T04006:NEXT 

1148 CLS 

115@ PRINTE133, "TOUCHES DE DEPLR 
CEMENTS"; 

1160 PRINT@198,"CW) : CX) : C.) 
EE 

1178 PRINT&238,"42 : <- : -> 

foo жоң; 

1188 PRINTG297, "TOUCHE DE TIR"; 
1198 PRINTe332,"SPRCE"; 

1195 SQUHD150,2 

12@й FORU=1TO4GGG: NEXT 

1218 RETURN 

2666 FORLI=1T018088:HEST 


APPLEIIETII° 


BUT DU JEU 


Vous connaissez les avions Kamikazes, 
et bien voici les hélicoptëres Kamikazes. Un de ces engins,trës maniable, 
menace votre refuge. 


Un hélicoptëre est prës à tout pour vous 
détruire. Réfugié dans le fin fond d'une 
forët vous vous préparez à faire face à ses 
assauts. Vous ne disposez que d'un ca- 


non trës puissant, dont vous indiquez 
l'angle de tir. Si vous réussissez à attein- 
dre l'un des hélicoptëres, un autre vien- 
dra prendre la relève, Jusqu'au moment 
ou l'un d'eux sera au-dessus de votre са- 


bane et vous bombardera. 
AU CLAVIER 


Pour tirer avec votre canon, il suffit d'indi- 
quer l'angle de tir, entre O et 90. 


100 REM COPYRIGHT (C) 1984 300 IF XH = 50 THEN 530 
118 REM TILT MICRO 310 DRAW 1 AT XH,YH 
115 REM 320 T = Ø: UTAB 21: HTAB 25: PRINT 
120 TEXT : HOME "SCORE : "3S: UTAB 23: INPUT 
139 DATA 2,0,6,0,38,0,44,40 "ENTREZ L'ANGLE DE TIR ? "3A 
140 DATA 245,9,46,36,228,219,22 $: IF ñ$ = "" THEN 340 
‚45 330 AD = UAL с LEFT$ C(ñ$,1)) Ж 1 
150 DATA 45,45,45,45,45,86,14,2 2% URL C RIGHTS (ñ$,1)) 
1 42 340 ñ = CAD 7 180) Ж 3.1415 
160 DATA 63,63,39, 22,94,73,59,6 350 XA = X:Yñ = Y 
3 360 X = UO X T X COS CA) + 14 
120 DATA 63,231,45,28,4,0,36, 36 370 Y = = (VO X T Ж SIN (82 = C 
4,9 Ж (Т Ж TD - 149) 
180 DATA 13,24,45,45,45,45,45,1 380 T- T * I 
4 390 .IF CY > 155 AND T > 1) OR X > 
190 DATA 54,54,223, 219,35, 36,63 278 THEN 280 
‚54 400 HPLOT X,Y 
200 DATA 38,0,255,255, 255, 255, 2 410 IF T = I THEN 350 
55,255 420 HCOLOR- 0: HPLOT XA,YA: HCOLOR- 
219 FOR I = 16384 TO 16384 + 58 3 
220 READ A: POKE 1,8 430 IF ABS (X - XH) < 10 AND ABS 
230 NEXT I CY - YH) < 10 THEN 450 
240 РОКЕ 232,0: POKE 233,64 440 GOTO 350 
250 HGR : HCOLOR- 3: ROT- Ø: SCALE= 450 HCOLOR- 0 
1 460 HPLOT X,Y 
260 HPLOT 9,155 TO 229,155: DRAW 470 FOR K = 1 TO 50: HPLOT XH + 
2 RT 2,154 С КМО C1) Ж 102, YH + С RND C 
270 I = .314:00 = 53:XH = 300 1) ж 10 = 8): NEXT К 
280 IF T < > 8 THEN HCOLOR- 0: 480'S = S + XH 
DRAW 1 AT XH, YH: HPLOT Ха, т 498 DRAW 1 АТ XH,YH: ROT- 48: FOR 
а: HCOLOR- 3 К = YH TO 160: DRAW 1 AT XH; 
290 YH = RND C1) Ж 110 + (XH 7 1 K = 1: HCOLOR- 3: DRAW 1 AT 
ØJ:XH = XH - 50 XH, K: HCOLOR- 0: NEXT K 
1 


500 XDRAN 1 AT XH, 16@ ` NEXT ТТ 
518 HCOLOR- 3: ROT= Ø 520 NEXT K 
520 XH = 300: GOTO 290 580 HCOLOR= 3 
530 HCOLOR= Ø: DRAW 1 AT XH, YH: 590 XDRAW 2 AT 2,154 
HCOLOR- 3: DRAW 1 AT 3,YH 600 HOME 
540 FOR K = ҮН TO 155: HPLOT 2,К 612 UTAB 22: INUERSE : PRINT "SC 
+ HCOLOR- @ ORE FINAL : ";S;: NORMAL : GET 
550 HPLOT 2,K - 1: HCOLOR- 3 a$ 
560 FOR TT = 1 ТО СК - 155) Ж 10 TEXT : HOME 


ALCOOLTEST 


«Un verre oui, trois verres bonjour les dégâts !» 
Après un bon repas avec des amis, 
il faut maintenant rentrer chez vous. 


BUT DU JEU 


Pour conduire, il faut d'excellents ré- 
flexes. Dans ce jeu,l'ordinateur vous pro- 
pose trois types de tests. Le premier est 
basé sur la rapidité simple, il faut presser 


la barre espace après un bip sonore. Le se- 
cond testera votre aptitude à distinguer la 
gauche de la droite. Le troisième, sans 
aucun doute le plus difficile, vous de- 
mande de taper le plus rapidement possi- 
ble les lettres apparues à l'écran, Bien sûr 


dans chaque test votre temps est compté, 
alors faites vite. 


AU CLAVIER 


Pour er ce logiciel, il suffit de suivre 


les indications données par l'ordinateur. 


100 КЕМ COPYRIGHT СС) 1984 260 PRINT : PRINT " — - LE ?BIL 

110 REM TILT MICRO ` ñTERAL' 

120 REH 220 PRINT : PRINT "  - LE ?COM 

130 REM TEST DE REFLEXES PLEXE" 

140 БЕП 280 PRINT : PRINT " DONT S 

150 REM TESTS DE CHAQUE TYPE" 

160 TEXT 290 GOSUB 1178 

120 НОМЕ 300 HOME 

180 REM ECRITURE DU CHRONO. 310 PRINT "LE "SIMPLE?" 

190 DATA 169,0,133,6,133,7,169, 320 PRINT : PRINT : PRINT "AU ^B 
17, 32,168,252, 230,6, 208, 4, 23 EEP? APPUYEZ LE PLUS RAPIDEM 


a ENT" 


200 DATA 2,240,14,44,0,192,16,2 330 PRINT .: PRINT "POSSIBLE SUR 
38, 173, Ø, 192, 133,8, 44, 16, 192 LA TOUCHE ’ESPACE › 
340 GOSUB 1120 
210 DATA 96,169,7,133,8,96,0,0, 350 FOR I = 1 TO 5 
2,0,0,0,0,0,0,0 360 HOME 
220 FOR I = 268 TO 815: READ A: POKE 320 F = 8 
I, ñ: NEXT I 380 PRINT "ATTENTION TEST N 
230 PRINT "TEST DE REFLEXES :" #1 ESSAI N#";I 
240 PRINT : PRINT : PRINT" 3 390 FOR T = 1 TO RND C1) ж 1000 
TYPES DE TEST " + 200: IF PEEK ( - 16384) > 
250 PRINT : PRINT " ~- LE SIM 122 THEN PRINT "SEULEMENT A 
PLE? Ш ВЕЕР": РОКЕ - 16368,0:F = 
E ге > 
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400 
410 


420 


430 


440 


450 


460 
420 
480 
490 
!5@@ 
51@ 
52@ 


530 
540 
550 
560 
520 
580 


590 
600 


610 


620 
630 


640 
558 


660 


620 


680 


BADA ANERE T 


NEXT T 
UTñB 12: HTAB 18: PRINT "BE" 
і CHR$ (2);"EP": CALL 768 


IF РЕЕК C8) < > 160 THEN PRINT| 
"SEULEMENT SUR LA TOUCHE "ES 

PACE 3K w F 421 
че RERK (ВӘ + 
256) ^ 1000 

TE PEEK LSN = 
"DELAI DEPASSE":TT = 


PEEK (7) * 


7 THEN PRINT 
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UTAB 21: PRINT "TEMPS : ";ТТ 
%" SEC. PENALITE : +"3CF X 
ТТ) 

ТІСІ? = TT + CF Ж TT) 

GOSUB 1120 
NEXT 1 
HOME 

F =0 
PRINT "LE ?BILATERAL’" 

PRINT : PRINT "ATTENDRE L’AP 
PARITION DU MOT ?DROITE " 
PRINT "Ой GAUCHE?’ ET APPUYE 
2 SUR LA TOUCHE :" 

PRINT : PRINT " - °A? POUR 
GAUCHE " 

PRINT : PRINT " - "Li POUR 
DROITE" 

GOSUB 1170 

FOR I = 1 TOS 

F =й 
HOME É 
PRINT "ATTENTION TEST N 
#2 ESSAI №8" ;1 
FOR T = 1 ТО RND (1) x 1000 


* 200: IF'-PEEK С - 16384) > 
122 THEN PRINT "SEULEMENT ñ 
Ш ВЕЕР": РОКЕ - 16368,0:F = 
Paste 2 S МЕТ? «T 
NEXT T 
IF RND (12> = .5 THEN P$ = 
"DROITE":C$ = "L": GOTO 650 


P$ = "GAUCHE" :C$ = "A" 
UTRB С ВМО СІ) X 15 + 3): 
€ RND C1) Ж 32): 
(2);P$: CALL 268 
IF РЕЕК C8) < > 193 AND PEEK 
(8) < > 204 THEN PRINT "A 
* OÙ ?L? SEULEMENT" : F = F + 
1 
IF PEEK (8) = 
"L" THEN PRINT "INVERSION": 
F-F*3 
IF PEEK C8) = 


HTAB 
PRINT CHR$ + 
l 


193 AND C$ = 


204 ñND C$ = 


690 


700 


7210 


"A" THEN PRINT "INVERSION": 
Е-ЕЗЗ 
Pte E PEEK: 126275 
256) / 1000 

IF PEEK C8) = 2" THEN PRINT. 
“DELAI ПЕРА5бЕ":ТТ = 60 


РЕЕК (2) Ж 


,UTRB 21: PRINT "TEMPS : "jTT 
j" SEC. PENALITE : *";CF X 
TT) 

EI ETT + ш? za] a) 

GOSUB 1120 

NEXT 1 
НОМЕ 
PRINT "LE ? COMPLEXE? 

PRINT : PRINT "UN MOT FORME 


DE 6 LETTRES Uñ S’AFFICHER" 


PRINT "A L'ECRAN IL FAUT LE 
TAPER LE PLUS UITE" 


PRINT "POSSIBLE SUR LE CLAUT 
ER SANS SE TROHPER" 

GOSUB 1178 

F -0 

FOR I = 1 TO Š 

HOME 

P$ = "" 

PRINT "ATTENTION TEST N 


#3 ESSAI N#";I 


FOR T = 1 TO RND (1) x 1000 
+ 200: IF PEER С - 16384) > 
127 THEN PRINT "SEULEMENT ñ 
u ВЕЕР": POKE - 16368,0:F = 
26428 NENT T 

NEXT T 

FOR J = 1 TO 6 

C$(J) = CHR$ С RND C1) £ 26 + 
193) :P$ = P$ + C$(J) 

NEXT J 

UTAB C RND (1) ж 15 + 3): HTAB 
( RND (1) * 32): PRINT CHR$ 


(2);P$ 

UTAB 18: HTñB 18 

FOR J = 1 TO 6: CALL 268:CR$ 
(J) = CHR$ ( PEEK. (8)): PRINT 
CR$CJ);:TTCJ) = C PEEK (6) + 
PEEK (2) x 256 + 100): NEXT 

J 


UTAB 21: GOSUB 1120 

HOME 

T=0:r-=0 

FOR J = 1 TO 6 
PCJ) = 0 

IF C$CJ) < > CR$CJ) THEN РС 
JY m TTCJJ Kl SEE ға OS 
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1000 IF CR$(J) = CHR$ (2) THEN : PRINT "TEST 3": PRINT 
РОО STITT Ж БЕ = ЕСЭ 1100 FOR I = 1 TOS 
1010 ‘PRINT C$(J);"-";CR$C(J);" > 1119 PRINT "ESS.";I;" "SECH: 
"3TTCJ) / 1@0@;" ЅЕС.";: HTAB ` HTRB 20: PRINT Т2(1);: HTRB 
“18: PRINT "PENALITE : -";PCJ) 31: PRINT ТЗСІ2:М1 = Hl + T1 
7 1000;" SEC." С12:М2 = M2 + T2CIJ:MG МЗ + 
1020 T= TN ж ТТ 02 T3CI) 
1030 NEXT J NEXT I 
1040 PRINT : PRINT "TOTAL : "jT х PRINT : PRINT : PRINT "MOYE 
1000 ;" SEC. PENALITE : ";(Т ж HES : " 
Е) 7 18000;" SEC.": PRINT PRINT : НТӨВ 9: PRINT ПІ 7 
1050 T3CI) = CT + (Т X FJ) х 1900 5;: HTRB 20: PRINT M2 / 5;2 HTRB 
> 31: PRINT. M3 / 5 
1060 GOSUB 1120 GOSUB 1120 
1020 NEXT I HOHE : END 
1080 HOME : HTAB 12: PRINT "RESU PRINT : PRINT : PRINT "APPU 
LTATS EN SEC. ": PRINT : PRINT: YE2 SUR UNE TOUCHE POUR CONT 
1090 НТАВ 9: PRINT "TEST 1";: HTAB INUER "5: GET ñ$: RETURN 
20: PRINT "TEST 2";: HTAB 31 


seni ALUNISSAGE 


Les missions Terre-Lune sont devenues 
d'une grande routine. 
Mais depuis quelques jours, l'attraction lunaire a changé 
et plus personne ne peut alunir. 


ne pas vous écraser au sol. utiliser deux paddles pour diriger la direc- 
ДЕ si BUT DU JEU E E tion du déplacement haut, bas, gauche et 
Aux commandes d'un LEM, vous devez AU CLAVIER droite. Si vous ne possédez pas de padd- 


essayer de vous poser sur la base APPLE. Dans ce logiciel, vous pourrez constituer les, vous devrez remplacer ces com- 
Dosez avec exactitude les réacteurs pour la surface lunaire, si vous le désirez.llfaut mandes par une saisie au clavier. 


1 REM COPYRIGHT CC) 1984 40 DATA 135,134, 135, 136, 137, 138 
2 REM TILT MICRO „139, 140, 141, 140, 139, 140, 139 
3 REM » 140,139, 138 
4 REH ALUNISSAGE 50 OHTA 139,138, 137,136, 135,134 
S TEXT : HOME : GOTO 260 › 133, 132,131,13@,129,128,127 
18 DATA 154,153,152,151,151,151 1126, 125,126 i 
*+151,151,151,151,151,151›151 6@ DATA 122,128,129,130,131,132 
‚ 152, 153, 154 3133, 134, 133, 132, 133, 132, 133 
20 DATA 153,152, 153,152, 153, 152 ‚ 134, 134,134 
› 153, 152, 151, 158, 149, 148, 149 20 DATA 134,134, 134, 133, 132, 131 
‚ 148, 149, 148 › 138, 129, 128, 127, 126, 125, 124 
30 DATA 147,146, 145,144, 143,142 1124, 124, 124 
1141, 140, 139, 138, 137, 136, 135 80 DATA 124,124, 124,124, 124,124 
: 136, 135, 136 :124,124,124,124, 124,124, 124 
—— ال‎ 
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60 


за DATA 


190 


110 


120 


130 


140 


150 


160 


170 
180 
190 
200 
210 
220 
230 
240 
250 


255 
26@ 


“рата 


:124,125,126 
127, 128, 127,126, 125, 124 
s123, 122, 121, 122, 123, 124, 125 
›126, 127, 128 

DATA 129,138, 131, 132, 132, 13 
2, 132, 132, 132, 132, 132, 132; 13 
2, 132, 132, 133 

DATA 134,135, 136, 137,136; 13 
5, 136, 135, 136, 137, 138, 139, 14 
9,141,148, 141 

DATA 140, 141,140, 141,142314 
3,144, 145,146, 147,148, 149; 15 
0,151,150, 149 

DATA 148, 147,148, 147, 148,14 
2,148,147, 148, 148, 148,148, 14 
3,148, 148, 148 

рата 148,148, 148, 148,148, 14 
2,146, 145,144, 143, 142,141, 14 
2,139,138, 132 
136,135, 134, 133, 132; 13 
1,138,129, 128,129, 130, 131, 13 
23133,132,131 


DATA 132,131,132,131,130,13 
1,132,133, 134, 135, 136, 137, 13 
8,132,136 

ҒОК 1 = 16384 ТО 16384 + 254 
READ ñ: РОКЕ I,R 

NEXT 1 

DATA 1,90,4,0,111,28,220,4S, 
45,36 

DATA 16,63,63,246,186,23,22 


173, 23,9? 

DATA 22,28,16,12,24,8,88,21 
3, 27,29 

DATA 101,228,63,30,38,0,255 
3255, 255, 255 

FOR I = 16640 TO 15679: READ 
A: POKE I,ñ: NEXT I 

POKE 232,@: РОКЕ 233,65 
RETURN 

HOME 


PRINT "VOULEZ VOUS CREER ЧОТ 


275 
280 
290 
зве 
310 


320 
330 
335 
340 
350 


360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 


500 
510 


520 
530 


540 
550 


560 
520 
580 


585 
590 
595 
6@@ 
605 
606 
607 
608 
610 
620 


RE PROPRE TERRAIN" 


GOSUB 10 

PRINT INPUT "OZN "jR$ 

IF R$ = "О" THEN 310 

GOTO 500 

PRINT : PRINT " ?I? POUR ALL 
ER'UERS LE HAUT" 

PRINT : PRINT " ?K? POUR ALL 
ER TOUT DROIT" 

PRINT : PRINT " "M? POUR DES 
CENDRE" 

PRINT : PRINT " 26» POUR EFFE 
ACER, RECOMENCER" 

PRINT : PRINT "PRET ?": GET 
R$ 

HGR : HCOLOR= 3: SCñLE= 1: ROT= 


9: DRAW 1 AT 139,79 
HPLOT 0,159 TO 254,159 


Y = 155 

FOR I = 0 TO 254 

GET R$ 

IF R$ = "Ө" THEN 350 

TERS 871 THEN e 
ІЕЕ DNL THEN Yu may-s 

IF Y > 159 THEN Ү = 159 

HPLOT I,Y: POKE I + 16384,Y 
NEXT I 

PRINT CHR$ C2): POKE = 163 
68,0 

REM 

HGR : HCOLOR= 3: ROT= @: SCALE= 
1 

FOR X = 0 TO 254: HPLOT X, PEEK 
(X + 16384) 

TERME ucc > INT CH ФФӘЕТШЕН 
NEXT Х 

Y = RND (1) Ж 150 

IF Y 2 РЕЕК (16384 + X) THEN 
540 

HPLOT X,Y 

NEXT X 

x = RND CI I зеет тое 11 

@ 

Yr 801 


HCOLOR= 3: DRñM 1 ñT X,Y 
Ха = XIYA = Y 
EE EE EE да 
x EEL PRT 


IF X € 19 THEN X = 10 

IF Х > 244 THEN X = 244 

JE < 10. THEN Ү "е 10 

РЕЕК С - 16384) 

ТЕС = 193 DEER 


HCOLOR= @: DRAW 1 AT XA, YA 


TES IG IE TIS АЙ FEL 71@ 
IF С = 136 THEN XI = XI - 1 820 
JF C = 149 THEN XI = XI + 1 

РОКЕ - 16368,0 

IF Y > PEEK (X + 16384) THEN 

890 819 


GOTO 590 

1F РЕЕК (16384 + X - 3) PEEK 
(16384 + X + 3) AND YI < 3 AND 
XI < 1 THEN  UTAB 22: PRINT 


"BRAUO": END 
UTAB 22: FLASH : PRINT "SCRA 
TCH": NORMAL : END 


Dans un circuit assez limité, déplacez vo- 
tre automobile, de plus en plus vite. En 
approchant des trois cents kilométres 
heures, la voiture devient pratiquement 


Vous venez de faire 1” 
La premiére course de stock car francaise aura 
dés maintenant vous entrainer avec acharnement. 


il faut 


E 


Km/h. 


incontrôlable. Après deux tours d'essai, 
vous devez tenter un tour complet à 300 


Ce logiciel nécessite l'utilisation de deux 


STOCKCAR 


acquisition d'un bolide. 


lieu dans quelques semaines, 


paddles, l'un pour la direction de la voiture 
représentée par un point et l'autre pour ré- 
gler la vitesse. Si vous ne possédez pas de 
paddles, remplacez leur gestion par une 
saisie au clavier. 


1 HOME [ 215 HCOLOR- 0: HPLOT X,Y: HCOLOR- 

5 X = 1Q:Y = 10:6 = 139:H = 50 3 

18 HGR 220 X = X + SIN (D) жа 

20 HPLOT 0,0 TO 279,0 225 Q = Q + .25 

30 HPLOT TO 279,159 226 K = K + ñ 

40 HPLOT ТО 179,159 230 Y = Y + COS (D) ха 

50 HPLOT TO 179,100 232 UTAB (22): PRINT " 

60 HPLOT TO 100,100 

78 HPLOT TO 190,159 

80 HPLOT TO 0,159 233 UTAB (22): PRINT TABC INT 

90 HPLOT TO 0,0 CCA ж 4) + 105"9" 

i800 HPLOT 20,20 TO. 259,20 235 ONERR GOTO 255 

110 HPLOT TO 259,139 236 HCOLOR= Ø: HPLOT 139,50 TO G 

120 HPLOT TO 199,139 ,H: HCOLOR- 3 

138 HPLOT TO 199,79 232 G = С SIN (D) Ж 10) + 139:H = 

140 HPLOT TO 80,79 с COS (D) X 10) + 50: HPLOT 

150 HPLOT TO 80,139 139,50 TO G,H 

160 HPLOT TO 20,139 240 HPLOT X,Y 

122 HPLOT TO 20,20 245 HPLOT 136,50: HPLOT 142,50 

180 FOR I = 1 TO 2 250 GOTO 200 

182 READ T: READ М 255 HOME 

185 UTAB 21: НТӨВ T: PRINT М 260 UTAB 22: НТӨВ 18: PRINT "BIN 

182 NEXT I G 2" 

198 DATA 1,0,2,58,14,100, 20, 150 220 PRINT "TEMPS- ";Q,: PRINT "D 
, 26, 200, 32,250, 38, 300 ) ISTANCE= ";К 

200 D = PDL (0) Ж .024639942 280 END 

| 218 а = PDL сі) ж .039215686 | L в 
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төне 702 ENPERIL 


Vous partez еп Vacances passer quelques jours 
au soleil des tropiques. 
Le voyage à bord du jet s'annonce sans encombre, 
lorsque tout à coup, l'impossible survient. L'équipage tombe malade, 
plus personne n'est en mesure de piloter. 


tous les problèmes propres aux pilotages, [ ` AUCLAVER  ] 

— - vous devrez poser le jet sur une piste très 
Après avoir pris les commandes du Jet, proche d'une grande agglomération, Sur- ^ Vous voyez votre avion se déplacer à l'é- 
vous devez maintenant vous poser et Veillez bien votre аг pour пе pas сгап. La vitesse se contróle à l'aide des 


sauver votre précieuse cargaison hu- heurter un gratte-ciel, et votre vitesse touches d'édition de droite et de gauche. 


maine. Vos souvenirs de pilotage datent ^ afin d'éviter de Vous crasheràl'atterris- — L'altitude est augmentée grâce à la 
du lointain service militaire. En plus de sage. touche A et réduite par la touche 7. 
escis 
100 REM COPYRIGHT CC) 1984 =] 230 DATA 31,185,120,4,36,53,48, 
110 БЕМ TILT MICRO 3,185,248,4,141,120,4,165, 46 
120 REM ‚36,53 
130 FOR I = 16384 TO 164090:T = T 240 DATA 48,5,153,248,4,16,3,15 
* РЕЕК CIO: NEXT Is IF T & 3, 120, 4, 76,30, 22, 138,74, 24,2 
638 THEN 288 у 4,24 
148 DATA 2,0,0,0,72,0,54,54,54, 250 DATA 168, 96,72, 160,2, 127,72 
54,54,54,54,45,45,45,45,45 : 126, 102, 53,32, 127,31, 104,10 
158 DATA 45, 45,36, 36, 36,36, 36,3 :36,53,48 
6:36,63,63,63,63,63,63,55, 14 260 DATA 5, 153,248, 4, 16,3, 153, 1 
14 2@,4,96, 169; 128, 141, 120,4, 16 
160 DATA 14,14,14,14,14,14,14,1 9,0,0 
4;14;14,12,24,8,24,8,24,8,24 270 FOR I = 16384 TO 16617: REñD 
A: POKE I,ñ: NEXT : POKE 232 
178 рата 8, 24,8, 24, 16, 32,30, 30, 10: POKE 233,64 
30; 30, 158, 243, 30, 30,30, 30, 4, 280 TEXT : HOME : NORMAL : PRINT 
180 DATA 111,23,62, 23,54, 62,63, 290 HGR : HCOLOR= 3: SCALE= 1: ROT=| 
63,63,23, 118,45,45,45,53,54, а 
54,54 300 UTñB 21: HTRB 1: PRINT "DIST 
1980 DATA 54,63,23,118,45,45,38, ALT, 
45,45,93, 32, 28, 63, 36, 36, 36,3 pre 
6,44 310 INUERSE 
200 DATA 45,45,45,93,32,28,63,6 320 D = INT С RND (12 x 800 + 19 
3,63,39,36,28,151,146,54, 182 3):ñ = INT C RND C1) £ D + 
‚146,146 $ 300):U = ІМТ С RND (1) X CA 
210 DATA 54, 54,6, 8, 279,57,32, 196 + D и 2) + 180) 
: 25,144, 248,169, 16,176, 238,7 330 Nz = 3 
2,160,1 340 FOR I = 1 TO Nx 
220 DATA 177,60, 186, 184, 144,8, 1 350 ХхСІ) = RND (1) Ж 83 + (C83 Ж 
3, 32,92, 31,78, 120, 4,96, 133,4 IT: 19 
6,32,127 360 YxCI) = RND (1) ж 150 + 1@ 
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[зла сас) = 3 
380 DRAW 1 AT XzCI),YzC(I) 
392 NEXT I 
400 DRAW 2 AT 140,80 
419 DP = з 
420 J = INT (J + (U 50)):КВ = 
PEEK ( - 16384) 

430 IF KB = 149 THEN U = U + 15: 
GOTO 478 

4480 IF KB = 136 THEN U = U - 15: 
GOTO 478 

450 IF KB = 193 THEN ñ = ñ + 10 

460 IF KB = 218 THEN ñ = ñ - 18 

470 а = INT CA + (CU - 500) 7 58 
)): POKE - 16368,@ 

480 U = INT (U - CC PDL (1) - 12 
8) / 5020 

490 FOR | = 1 TO NZ 

500 IF Y#CI) > 120 THEN HCOLOR= 
9: DRAW 1 AT XzC(I),Yz(I):Yz( 
1) = 10:X4(1) = RND C1) x 2 
090 + 15: IF (CD - J) 7 (U / 
50)) < 50 THEN C4CI) = Ø 

510 YxCI) = Y4CI) + DP 

520 HCOLOR- Ø: DRAW 1 АТ Xz(I),Y 
ZCI) ~ DP: HCOLOR= Cz(I): DRAW 
1 AT X#CI),Y#C1): HCOLOR- 3: 
DRAW 2 AT 140,80 

530 NEXT I 

540 UTñB 22: HTAB 1: PRINT " 

“33 HTAB 1: PRINT D - J;: HTAB 
19: PRINT " "j: HTAB 19: PRINT 
A3 HTAB 36: PRINT " "j: HTAB 
36: PRINT U; 

550 IF A < = 10 THEN TEXT : НОМЕ 
: UTAB 12: FLASH : PRINT "AL 
TITUDE TROP BASSE 22": GOTO À 

724.220 

SC 
/ 


IF À > 3000 THEN TEXT : HOME 


* UTAB 12: HTAB 10: FLASH : PRINT 
“TROP HAUT 22 PLUS D'OXYGENE 
29": GOTO 720 

520 IF U < 50 THEN TEXT : HOME 
` UTRB 12: FLASH : PRINT "UI 
TESSE TROP BASSE 22 PIQUER М 
ORTEL 2": GOTO 228 

580 IF U > 1500 THEN TEXT : HOME 
* UTAB 12: FLASH : PRINT "UI 
TESSE TROP RAPIDE AILES DECH 
IREES ": GOTO 220 

590 IF J < (D - 2) THEN 420 

600 IF ñ > 58 THEN 210 

612 IF U > 200 THEN 210 

620 РОКЕ - 16302,0 

632 FOR I = 1 TO 150 

649 HCOLOR= @: HPLOT 120,1 - 1 TO 
169,1 - 1: HCOLOR- 3: DRAW 2 
AT 140,80: HPLOT 119,1 TO 1 
61,1 

650 NEXT I 

860 FOR I = 80 TO 5 STEP ~ 1 

622 HCOLOR= 0: DRAW 2 АТ 140,1: 
HCOLOR- 3: DRAW 2 AT 140,1 - 1 

680 FOR J = @ TO 800 STEP I: NEXT 
J 

692 NEXT I 

7@@ GOTO 220 

210 HOME : UTñB 23: FLASH : PRINT 
"OX ж Ж Жу Ж SCRATCH. 99 
`£ ж k Ж": UTAB 24: NORMAL 
+ PRINT "ALT : "за, "ЧІТ :";U 

720 NORMAL 

230 РОКЕ - 16368,0 

240 GET ñ$ 

250 ТЕХТ 
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ATARI 400. ATARI 800. ATARI 600XL-800XL 


210 PRINT " — =>-AVERTISSEMENT---" 200 PRINT "O-NOIR, 2-ROUGE, 4=BLEU, &-VIOLET" 

20 PRINT "LES PROGRAMMES BASIC r. 210 PRINT "8=VERT, 10=JAUNE, 12=TURQUOISE, 14=BLANC" 
30 PRINT " SONT COMPATIBLES AVEC: " 220 PRINT 

40 PRINT "LES ATARI: 800" 250 PRINT 

50 PRINT " BOOXL, 1200XL" 240 PRINT "AUTRE REMARQUE: LES ATARI ONT LA PAR-" 
70 PRINT 220 PRINT "TICULARITE SUIVANTE: SI AU BOUT DE 15" 
80 PRINT "NEANMOINS, CES PROGRAMMES ONT ETE" 260 PRINT "MINUTES ENVIRON, ON NE TOUCHE FAS LE" 


90 PRINT "CREESSUR АТ! 
100 PRINT "NE POS: 


IL FAUDRA DONC APPUYER" 
2 3 POUR RESTITUER" 
130 PRINT "LES EE › QUI EUX, EN" 320 PRINT "LES COULEURS INITIALES." 


VOUS SUFFIRA, LORSQUE VOUS RECON-" 340 PRINT "ET ENFIN, TOUTES LES FOIS QU VOUS" 
160 PRINT "L* INSTRUCTION *SETCOLOR^ PAR" 350 PRINT "FAITES “RUN”, VOUS DEVEZ D'ABORD" 
170 PRINT "PAR LA COULEUR CORRESPONDANTE" 360 PRINT "APPUYER SUR SYSTEM RESET'." 
180 PRINT "A CELLE DE VOTRE MANUEL ATARI" 370 PRINT 

VALEUR, COULEUR DE L’ATARI BOO-PERITEL: " 400 PRINT "VOILA... MAINTENANT BON AMUSEMENT. " 


SAUT DE HAIES 


Classique mais ardu... Vous пе pensiez pas pouvoir 
faire du sport sur votre micro, 
et bien vous vous trompiez. Cette lecon vaut bien un jeu sans doute. 
Vous voici sur un stade 
ой votre forme physique (et intellectuelle) 
vous sera salutaire. 


éssayant de gagner le maximum de 
temps, et en évitant, bien sür, de mordre 
la poussière. Vous êtes chronométré et 
vous devez toujours battre votre propre 


BUT DU JEU ] 
Partez sans perdre une seconde dès le si- 
gnal et enjambez l'un après l'autre les di- 
vers obstacles que Vous rencontrerez en 


record, Attention les haies sont parfois 
très rapprochées. 


AU CLAVIER 
Faites RUN et courez 


КЕ 
99 КЕМ ІМІТ. CARACTERES GRAPHIQUES 

100 GOSUB 1000 

0 GOSUB 15000:REM AFFICHE LES REGLES 

КЕМ ІМІТ. LES VARIABLES DU JEU 

GOSUB 10000 

GOSUB 14100:REM DEGRE DE DIFFICULTE 

REM INIT. DECOR DU JEU 

GOSUB 9000 

A RE 8000:REM AFF. SCORE А BATTRE 


КЕМ DEROULEMENT D'UNE MANCHE 

0 GOSUB 7000 

КЕМ PERDU PAR FEIGNANTISE? 

IF FJ>1 THEN MSG=1: GOTO 600 

REM А-Т-ОМ PERDU РАК LENTEUR? 

IF SC>SCBA1+BONUS THEN 500 

REM BONH. А GAGNE UNE MANCHE 

9 BOSUB 13000:REM MIMIQUES DU BONH. 
443 REM DIFFICULTE SUPPLEMENTAIRE: 
445 ВЕ. SIR МАМС<10 THEN FA=MANC 


480 БОТО 300:REM REJOUE UNE MANCHE 

499 REM ON А PERDU: 

500 IF МАМС<& THEN MSG-2:GO0TO 600 
. 909 КЕП MAIS AVEC UNE EXCUSE: 


C=MANC+1:GOSUE 16000:REM NB MANCHES GAGNEES 


450 C+INT (RND (0) *(110-FA*10)):REM DIMINUE SCORE А BATTRE 
455 605 14000:REM AUGMENTE DIFFICULTE HAIE 

460 MSG: OSUB 11000:REM MESSAGE: GAGNE 

470 FOR ) ТО 1000:NEXT K:REM ATTENTE POUR LECTURE MESSAGE 
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599 REM PARTIE TERMINEE 
600 GOSUB 11000:REM AFF. MESSAGE 


410 GOSUB 12000:REM ATTENTE PR REJOUER 


456 GOTO 200:REM RECOMMENCE PARTIE 


999 REM <<< INIT. ECRAN + CARA. GRAPH. >>> 


1000 POKE 104, PEEK (106) -5: GRAPHICS 
1010 SETCOLOR 4,0,0:SETCOLOR 1,0,0 
1020 SETCOLOR 2,0, 12: РОКЕ 


0 


752 
1030 POSITION 4; 10: PRINT "PATIENTEZ QUELQUES INSTANTS..." 


1100 DLST= (PEEK (106) +1) #256 


110 FOR І-0 TO 1023:POKE DLST*I,PEEK(S7344*1):NEXT I 


1 
1120 POKE 756,DLST/256 


1130 КЫК TO 119:READ У:РОКЕ 512+DLST+I,V:NEXT I 
2000 REM <<< CARACTERES GRAPHIGUES >>> 


2029 REM НАТЕ 

2030 DATA 0,8, 8,8, 9,24, 56,255 
2049 КЕМ НАТЕ” TÜMBEE 

2040 DATA 0,0,0,0,64, 95, 126,255 
2099 REM TERRÀI 

2100 DATA 0,0,0,0,0,0,0,255 
2199 REM FANIDN 


2200 DATA 16,56,124, 56, 16,16, 16,255 
: ` COURT 


2299 REM BONH. POS. 1 
0 12,6 
2310 DATA 127, 216; 24, 30, 50, 227,128, 
: COURT 


2519 REM ВОМН! POS. 2 
2400 DATA 0,0,0,0,0,12,1 


2500 DATA 0,0,0,0,0 


2599 REM BONA. POS. 4 ` : DEPART 
5600 DATA 0,0,3,59, 56,212, 164,255 
2899 REM BONH. POS. S. _: GAGNEI 


2700 DATA 0,0,0,0,0, 24, 24,0 

2710 DATA 153,189,90, 24, 36,3: 

2799 REM BONH. POS. © `: GAGNE: 

2800 DATA 0,0 

2810 DATA 90,50 
КЕМ 


IF РОЅВ<5 THEN 3050 
IF POSB- 
I POSI THEN AFBH-BDEP:GOTO 


AFEH=BCOUR 1 : BASC=-BASC 


КЕМ EFFACE ANCIEN BONHOMME 
IF POSBi-3 THEN РОКЕ ECRAN+(X1 


КЕМ --- AFFICHE BONHOMME --- 
X1=X:Y1=Y-ST 
Ô ANO=PEEK (ЕСКАМ+Х1+Ү1*ХМ):РО5В1 
IF FOSB=3 THEN РОКЕ ECRAN+(X1- 
IF POSB-4 THEN РОКЕ ECRAN+X1+Y 
О POKE ЕСКАМ+Х1+ (Y1—1)*XM, AFBH: Р! 
RETURN 
REM LE JOUEUR SAUTE 
IF ST-0 THEN GOSUB 4400:RETURN 
REM JOUEUR EST DEJA EN SAUT: 
IF STICK(JR) 4214 THEN 4100 
LSAUT=LSAUT-1 
О IF LSAUT=0 THEN 4100 

GOSUB 4200: RETURN 
REM LE JOUEUR RETOMBE 
STzO:LSAUT-0:POSB-1 
GOSUE 4200: RETURN 
КЕП АХОВЕ ВОМНОММЕ + ТЕЅТЕ LE 
=X+ 

REM TESTE SI BONH. SUR HAIE: 
O IF РЕЕК(ЕСКАМ+Х+(Ү-5Т) жХМ) =НА1 
REM TESTE SI FIN LIGNE: 
IF X<>XM-1 THEN RETURN 
IF PEEK(ECRAN+X+Y*XM)<>FAN THE! 
39 REM ВОМН. EST ARRIVE: 

0 FJ=1:ST=0:POSB=5:; RETURN 
REM LE JOUEUR TOMBE SUR HAIE 
О POSB=4:NHAI1=NHAI1-1 


255 


0 2,0 
2410 DATA 170,95,24,28,118,56,1,255 
REM VONH: РО5.'5 ` : SAUTE 


0,3,2 
48,254,48,252,131,0 


6, 102, 255 
2 


2 54 HE SE 102,255 

5 
_ 22" AFFICHAGE BONHOMME == 
REM SELECTIONNE CARACTERES GRAPH. 


3 THEN AFBH-BSAUT:GOTO 3100 


3100 


IF POSI THEN AFBH=BGAG1:GOTO 3100 
IF POSB=6 THEN AFBH-BGAG2:G0T0 3100 


IF BASC-ABS(BASC) THEN AFBH-BCQUR2 


-1)4Y1*XM,O:POKE ECRAN+X1+Y1*XM,0:80TO 5200 


IF POSBi1-4 THEN POKE ECRAN+X1+Y1#XM, АМО: БОТО 3200 
POKE ECRAN+X1+(Y1-1)*XM,0:POKE ECRAN+X1+Y1#XM, ANO 


-POSB 

1)*Y1XXM, AFBH:POKE ECRAN+X1+Y1*XM, AFBH+1: GOTO 2400 
1жХМ,АҒВН: GOTO 2400 

ОКЕ ÉCRAN+X1+Y1*XM, AFBH+1 


E THEN 4300 


М Y=Y+3: X=0: RETURN 
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200 NH=NH 
7210 BONUS= 


GOSUB 3000: AND-HAITE 
RETURN 

REM INIT LE SAUT 

ST-1:LSAUT-3: FOSB=3 

GOSUB 4200: RETURN 

REM. DEPLACEMENT DU JOUEUR 

IF ST=1 THEN 50508 4000:RETURN 

IF STICK(JR)214 THEN GOSUE 4000: RETURN 
GÜSUB 4200: RETURN 

REM PERDRE UN TOUR ET DEPART 

IF РП5В<24 THEN RETURN 

IF STRIG(JR)21 THEN DEFA=1:RETURN 
DEPA=0: POSE-1: ВАЅС=1 


О RETURN 


REM DEROULEMENT D'UNE MANCHE 
REM INIT. LA MANCHE 


О GOSUB 7500:REM INIT VARIABLES 


BÜSUB 7600:REM BONH. EN POS. DEPART 
REM DEROULEMENT DE LA MANCHE: 


0 GÜSUB 7700:REM AFFICHE SCORE 


IF FJ-2 THEN 7300:REM SI DISQUALIFIE EN COURSE 
REM DIMINUE ECART ENTRE LES HAIES 


© GOSUB 2000: КЕМ SI EN POS. DEPART 
30 IF DEPA- 


THEN 7100 
EM GESTION DU BONH. 
00:КЕМ AFFICHE ВОМН. 

IF FJ<1 ТНЕМ 7100 
КЕМ МАМСНЕ ТЕКМІМЕЕ 

AI-NHAI EM NBRE HAIES TOMBEE 
NH=0 THEN BONUS=100 
GOSUB 7710:REM AFF. SCORE FINAL 
REM DIMINUE ECART ENTRE LES HAIES 


299 REM AFF. BONH. TERMINE 


ST=0: ANO=TERK: F0SB=5: 60SUB 2000 


RETURN 

БЕМ INIT. VARIABLES POUR UN JEU 
X1=0:Y1=DEBLIG:X=X1:Y=Y1 
ANO=TERR: POSB=4: BASC=1 

FJ=0 

RETURN 


REM POSITION DEFART DU BONH. 
POSB=4:GOSUB 3000:REM BONH. POS DEPART 
POSITION 5,3:? "A VOS MARQUES..." 

FOR К-0 TO 100:NEXT К 

POSITION 5,3:? " ү 

FOR K=0 TO 100*RND(O)*100:NEXT K 

REM BRUIT DU DEPART 

FOR 1-0 TO 10:SOUND 0,1,0,15:NEXT I 


RETUI 

REM AFFICHE POINTS SCORE 
REM MISE А JOUR SCORE: 
SC=SC+5: IF SC>MXSC THEN FJ-2 

REM AFFICHE SCORE 

POSITION 30,0:? SC;" ": RETURN 

REM AFFICHE "А BATTRE" + SCORE 
POSITION 2,0:? "A BATTRE: „ASCBA1 ; " d 


POSITION 23,0:7 "SCORE= ";5С;" 
RETURN 

REM AFFICHE DECOR DU JEU 

? CHR$(125) 


ЕСКАМ-РЕЕК (88) +256#PEEK (89) 
ХМ=4! 


M=24: MAXL=5: DEBL 16=5 
LIG1=ECRAN+XM*DEBLIG 
NHAI NH=0 
FOR TO MAXL 
FOR M-1 


I TO X 
REM POSE-T-ON FANION D'ARRIVEE? 
IF I-XM-1 AND J=MAXL THEN POKE 161+І, ҒАМ: GOTO 9400 
КЕМ РОЅЕ PEUT-ETRE DES HAIES 
IF МН>0 AND МН<МАХМН THEN 923 
IF І<ГІМІ OR I>LIM2 THEN 9300 
IF I/H<>INT(I/H) THEN 9300 
IF RND(0)<0.15 THEN 9300 
POKE LIG1+I,HAIE:NH=NH+1 
NHAI=NHAI+1:GOTO 9400 
КЕМ POSE DU TERRAIN 
POKE LIG1+I,TERR:NH=0 
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9400 МЕХТ 1 

9410 LIG1=LIG61+3*XM 

9500 NEXT J 

9505 NHAT t= =МНАЈЕ ¿RETURN е 
до E 


KE M VARIABLE DESSIN GRAPHIGUE 
10010 E 


TERR=66:REM TERRAIN COURSE 
REM FANION D'ARRIVEE 
B:REM BONH. COURT 1ER FIG. 
O:REM BONH. COURT 2EME FIG. 
10070 BSAUT-72:REM ВОМН. SAUTE 
10080 BDEP-74:REM BONH. GENE FRA 
10090 BGAG1=75:REM BONH. GAGNI 
10092 BGAG2=77:REM ВОМН. BAGNE POS А 
10100 di REM JOYSTICK DU JOUEUR 

O LIMi-4:REM DEBUT LIG POUR HAIE 
10120 OC REM FIN LIG POUR HAIE 
10140 5СВА-1500:5СВА1-5СВА:КЕМ SCORE A BATTI 
10150 MXSC=2000:REM SCORE DE DISGUALTÉICATION EN COURSE 
10160 МАМС=0: КЕМ NBRE DE MANCHE 


RETURN 
10999 REM EN DIVERS 
11000 POSITION 2 
11010 ol Luz 50808 11100, 11200, 11300, 11400 


RE | MESSAGE 1 
? "PERDU 
PRINT "DISQUALIFIE POUR ... FAINEANTISE !":RETURN 
REM MESSAGE 2 


? "PERDU: " 
2 "VOUS БІНЕ nus LENT... "s RETURN 


e "E RE 
10 ? "MAIS VOUS AVEZ TENU ";MANC;" MANCHES !": RETURN 
99 КЕМ MESSAGE 4 
400 ? "GAGNE: " 
410 ? "IL FAUDRA MAINTENANT BATTRE ";SCBA1;" !":RETURN 
999 REM Wëld POUR REJOUER 
12000 POSITION 
12010 PRINT “РОДА REJQUER APPUYEZ SUR LE BOUTON" 
12020 FOR K=0 TO SO:IF STRIG(JR)=0 THEN RETURN 


NEXT K 

12050 POSITION 5,22 
12060 PRINT "POUR REJOUER, APPUYER SUR LE BOUTON" 
12070 FOR K=0 TO SO:IF STRIG(JR)-0 THEN RETURN 
12080 NEXT K 
12090 GOTO 12000 
12999 REM MIMIQUE DU BONH. VAINQUEUR 
13000 FOR I=1 TO 10 
13010 IF РОЅВ=5 THEN POSB=6:G0TO 15100 

POSB-S 


13100 GOSUB 3000:REM AFFICHE BONH. 
13110 ipio TO SO:NEXT K 


13300 RETURN 

15999 REM DIFFICULTE DU JEU 

14000 IF Н=МАХН THEN GOSUB 14100:RETURN :REM SI COMPLIQUE JEU 

14010 H=H-2: IF Н<МАХН THEN H-MAXH 

14020 RETURN 

14099 REM AUGMENTE LA DIFFICULTE JEU 

14100 IF MANC>12 THEN MAXNH : МАХН=5: RETURN 

14110 IF МАМС>8 THEN MAXNH АХН-5: RETURN 

14120 IF MANC>4 THEN MAXNH : MAXH=4: RETURN 

14130 MAXNH=1:H=10: MAXH-3: RETURN 

14999 REM REGLE DU JEU 

15000 PRINT CHR$(125):REM EFFACE ECRAN 

19030 BRINDA" --- 110 METRES HAIES ---":КЕМ 6 BLANCS AVANT LES '- 
30 PRI 

15040 PRINT "ET OUI, LES JEUX OLYMPIQUES DE 1984" 

15050 PRINT "VONT COMMENCER... ET VOUS PENSIEZ" 

15060 PRINT "REGARDER TRANQUILLEMENT LES ATHLETES" 

15070 PRINT "S'ESSOUFLER DEVANT VOTRE TELEVISEUR, " 

15080 PRINT "N'EST-CE РАБ ? 

15090 PRINT "ЕТ BIEN МОМ, Vous COURREZ VOUS AUSSI!" 

15100 PRINT " DES LE COUP DE FEU, Qo SUR LE" 

15110 PRINT "SUR LE BOUTON DU JOYBTI 

5130 PRINT " POUR SAUTER LES MATES, Teaser? LES 

140 PRINT "LE MANCHE VERS LE HAUT" 

170 PRINT " FOUR FAIRE VOS PREUVES, VOUS DEVREZ" 


Nero 
Sanot 
220022 


AAAI 
So 
580 
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15180 PRINT "OBTENIR UN SCORE INFERIEUR ñ CELUI" 
15190 PRINT "QU'IL FAUT BATTRE. (SI AUCUNE HAIE NE" 
15192 PRINT "TOMBE VOUS POURREZ DEFASSER CE SCORE" 
15194 PRINT "DE 100 POINTS)." 

15200 PRINT 

15210 PRINT "N.B.: N'OUBLIEZ PAS DE BRANCHER LE" 
15320 PRINT " JOYSTICK DANS LE PORT 1" 

15330 PRINT 

15340 PRINT "АРРЏҮЕ2 SUR LE BOUTON POUR COMMENCER"; 
15400 IF STRIG(O)=1 THEN 15400 

15410 PRINT CHR$(125):REM EFFACE ECRAN 

15420 RETURN 

15999 REM NOMBRE DE MANCHES GAGNEES 

` 16000 IF МАМС>КСМАМС THEN RCMANC-MANC 

16010 POSITION 2,19:РКІМТ "МАМСНЕ RECORD= ";RCMANC 
16020 POSITION. 25,19:РКІМТ "MANCHE NO. ";MANC;" Ж 
16100 RETURN 


= 

nu GYROBATTLE 

mu) git, 

ATARI A bord de votre aéronef léger, 

vous devrez accomplir un voyage au bout de l'enfer. 
En effet, vous venez d'étre prévenu 
qu'un seul rescapé subsistait à l'intérieur de la dangereuse cité interdite. 
Allez donc vite le secourir, mais prenez garde 
au champ magnétique. 
ite bord du super-aéronef de secours. 
[су ШО UE AU CLAVIER 
Insérez-vous dans le champ magnétique tance au rescapé et ramenez-le enfin à Faites RUN et suivez les instructions. 


li 1) 


7 DIM R$( 

10 GOSUB 1100 

20 GOSUB 10000:REM AFFICHE LES REGLES 

20 GOSUB 1500:REM la montagne 

40 GOSUB 3000:REM les murs 

50 GOSUB 3500:REM affiche le rescape 

60 GOSUB 4000:REM les points 

70 GOSUB 2000:REM decollage helico 

O GOSUB 1000: GOSUB 2100: GOSUB 1050:605МВ 2100:GOSUB 3100: IF HELICO<>0 AND КЕ5САРЕ5< 20 THEN 80 
90 PRINT "è":SOUND O, O, 0, O: SOUND 1,0,0,0 

91 REM Pour obtenir à, faites esc-Shift clear 

100 IF HELICO=0 THEN PRINT "Vous n'etes guere secouriste !!..":60ТО 140 
110 GOSUB 4100:REM fin de jeu 

120 PRINT " BRAVO !! Vous êtes un hero" 

130 PRINT "ou une heroine.." 

140 PRI "Voulez-vous rejouer (0/М) " 


150 INPI SIE R$(1)-"O" THEN PRINT "ё": БОТО 30 

160 PRINT "AU REVOIR . END 

999 REM °° DEPLACEMENT PALES 56 5 
1000 POKE DLST+512,254:POKE ПІ.57%520,0:РПКЕ DLST+528,0:POKE DLST+536, 127 2 


1010 POKE DLST+553, ОКЕ DLST+560,15:FOKE DLST+561 224: POKE DLST+568, 224: RETURN 
1050 POKE DLST+512, КЕ DLST+520, 240: РОКЕ DLST+528, 15: POKE DLST+536, 224 
POKE DLST+553,126:POKE DLST+560,0:POKE DLST+561,0:POKE DLST+568, 127: RETURN 
CARACTERES GRAPHIQUES = 

K O6, PEEK (105) -5: GRAPHICS 0 
1110 SETCOLOR 4,0,4:SETCOLOR 1,10,13 


1120 SETCOLOR 7,4:PÜKE 752,1 
1453 D 156) +1) #256:G0SUB 4500 
Ó 


FOR 0 TO 1 ОКЕ DLST*I,PEEK(57344*I):NEXT I 
90 POKE 756,DLST/256:POKE 752.1 
60 FOR 1=0 TO &3:READ У:РОКЕ S12+DLST+I,V:NEXT I 
69 REM ** HELICO COTE GAUCHE жж 
7 s 


REM * 
DATA 


000 EECH 


2 
2 
2 
2 
2 
2 
2 
5 
2 
2 
2 
2 
2 
2 
2 
0 
2 


r Zeen EE 


Є] 


2200 


амиа 
SOA 
52oco-o 


DATA 255,94, 252,134, 195, 255, 48, 254 
NE Not ба oe, 25e 
Lp у 
DATA 15,224,5,199,255,255,255,0 
DATA 255,96: 28, I Ee 
PRINT CHR$(125):REM ЕҒҒАБЕ ECRAN 
ECRAN=FEEK (88) +РЕЕК (89) 256 

REM addresse de debut d'ecran 


Ren жє AFFICHAGE GUENTAGNES жж 
Xz0: Y=RI 


IND (O) *4+15 
Vis E AND Nes) AND Y>15) 
POKE ECRAN+Y1#40+X, 128: 1:ІҒ Y1>Y QUEN: 1520 


0 A=72*#(DY=- МЕ Веи =1): Y=Y+D 


POKE ECRAN+Y1*40+X, A 
IF А<272 THEN 1500” 
POKE ECRAN+Y1*40+X, 128 
FAKE ECRAN+(Y1-1)*40+X,72 

X=X+1: IF X<40 THEN 151 
POKE ECRAN+10,69:POKE ЕСКАМ+11,70:РОКЕ ECRAN+12, 71 
REM affichage" gros helico 
REM ## DEMARAGE HELICO ## 
XREsd: (H2O: POLE Велдон 

+40%YH+XH, 64: РОКЕ ECRAN+40#YH+XH+1, 55 

SOUND 0,1,2, 15: 50808 1000 
SOUND 1, 1110.1 10, 


20 FOR I=0 10 1A: NEXT J 
SUB 


1050: МЕХТ I:80UND 0,150,2,15 
BE 64: C2=65 
REM init des caracteres helico 
RETURN 


REM ## DEPLACEMENT HELICO ## 
GOSUB 1000: GOSUB 2500 
e chi 


REM test si il ya quelqu 05 

S=STICK (0) : DX= (8-89 8= Ч7)+(825›) # (XH<38) - ( (S=9) + (S= 10)+(S=11))*(XH>0) 
REM deplacements dx, 

DY=( (S=5) + (5=9) + (S= 157 %(ҮН<22)-((8-8) + (S210) + (8214) ) ж (ҮН>0) 
IF DX<>0 OR Don THEN POKE AD,O:POKE AD+1,0 

REM efface les tr 

XH=XH+DX : YH= Үйі [37:0 1050: GOSUB 2300 

REM tests ecran 

IF DX=0 THEN 2180 

REM aucun chanqement de sens 

Ci=64:C2=65: IF DX=1 THEN C1=66:C2=67 

REM caracteres d'at RAUM 

РОКЕ AD,C1:POKE AD+1 


ST-STRIG (0): SIE ST=0 AND (XH=10 OR XH=11) AND YH=1 AND HOM=1 THEN GOSUB 4070:HOM=0:GOSUR 350 


REM test si reussit la sau 
BEE OL IF A=68 AND ®Т=о AND HOM=0 THEN POKE AD+40, O: HOM=1 
prend une personne 
ЕРЕК (RDA IF B-68 AND ST=0 AND HOM-O THEN POKE AD*41,0:HOM-1 
i dem 


RETURN 
REM ## TEST HELICO ## 
T LAUR A=PEEK (AD) : B=PEEK (AD+1) 

(A=0 OR (A>63 AND A<6B)) AND (B=0 OR (B>63 AND B<68)) THEN RETURN 
IF (A=68 AND B=0) OR (A=0 AND B=68) AND HOM-O THEN HOM-1:RETURN 
BOSUB 4050: GOSUB 2000 
REM helico en moins et reinialise 
AD=ECRAN+XH+YH*40 
IF DORE THEN GOSUB 3500 

RETURN 


H 

REM ++ INIT DES 2 MURS ++ 

V1=INT (RND (0) #8) +3: Y2-Y142 

ЕМЕА 1:ХВМ-0 

FOR_1=0 TO PEN POKE ECRAN+I+Y1*40,128 
POKE ECRAN+I+Y2*40,128:NEXT I 

pus ECRAN+XBM*+YBM240, 128 


Bäi e GESTION DES OBSTACLES ++ 

POKE ECRAN+XEM+YEMx40 9 

REM efface carre mobi 

XBM-XBM*1:IF ХВМ-40 THEN ХВМ=0 

REM sep ace le pave 

POKE ECRAN+XBM+YBM*40, 128 

REM reaffiche le pave 

IF АТТМ120 THEN 3160 E 

REM si attente de fermeture du mur superieure non fini 
KEE RUKE, AD1,128:PDKE AD1+1,128 
REM fermeture du mi 


О АТТМ1= INT (RND (0) #10) +10: X1=INT (RND (0) #39) 


REM nouvelle attente et ouverture 
ADi-ECRAN*X14Y1*40:POKE AD1,0:POKE AD1+1,0 


1 REM affiche la nouvelle ouverture 


IF АТТМ220 THEN 3210 
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REM si attente de fermeture du mur infereure non fini 
AD2=ECRAN+X2+Y2*40:POKE А02,128:РОКЕ AD2+1, 12 

3190: ATTM2=INT (RND (0) #10) +10: X2=INT (RND (O) #39) ' 

3200 AD2=ECRAN+X2+Y2%x40:POKE Ар2,0:РОКЕ AD2+1,0 

5210 ATTMI=ATTMI-1: АТТМ2-АТТМ2-1” 

5211 КЕМ сі attente еп moins 

5220 RETURN 

5499 БЕМ << m D ТОМЕНДЕ > 


INTEND (9 
VE E TO 14 STEP -1 
PEE ECRANS ym 40) 
=128 THEN ERE E 68:60Т0 3590 
3540 ïE (78-18: (18) THEN GOSUB 1000 
3550 IF Y- НШЫ ТНЕМ Së 1050 
3560 A1=A:NI Y:X=X+1:IF X>39 THEN Х=0 
бб Pa S TEN X=0 


He" 
REN INIT DU SCORE 
4000 POSITION 0,23: PRINT "Helicopteres :";:POSITION 25,23:PRINT "Rescapes :"; 
4010 НЕСІСО=5: RÉSCAPES=10 
4020 GOSUB 4050:GDSUB 4070: RETURN 
4049 REM UN HELICO EN MOINS 
4050 HELICO-HELICO-1:POSITION 15,25 
4060 PRINT HELICO; : RETURN 
4069 REM UNE PERSONNE SAUVEE 
4070 RESCAPES=RESCAPES-1: POSITION 36,23 
4080 БЕТТЕН 36,23:PRINT RESCAPES; 
4081 ү de rèscapes restants a sauver 


0.50, 2 IS: S0UND 1,60, 10,5 
et Ge ò Step ы 1600 
4120 POSITION 1,0:PRINT CHRS (5) СНЕЖ (6) $CHRS (7); " "3 


4130 GOSUB 1050:NEXT I 
4140 POSITION 9: T CHREIG) ERY (7) mong Hoch 1000 
4150 POSITION E e UE 1 
4160 POSITION © 0: PRINT VI DHT B 10 

OR I=XH ТӨ 0 STEP -1:G08UB 1080 
4180 POSITION I,1: PRINC CHR$ (0) ;CHR$(1);" "; 
4190 GOSUB 1000: NEX 
4200 POSITION 0,1: PRINT CHR$(1):" "::GOSUB 1050 
4210 POSITION O;1:PRINT " ";:SOUND 0, 0,0,0:SOUND 1,0,0,0 
4220 HER HE TO’ 200:NEXT I 


4499 REM MESSAGE POUR L'ATTENTE 
4300 POSITION 4,10:РБІМТ "PATIENTEZ QUELQUES INSTANTS...":RETURN 

9999 REM REGLES DU JEU 

10000 PRINT СНЕ®(125):ВЕМ EFFACE ECRAN 

10010 PRINT " ---LE MONDE INTERDIT---":REM 7 ESPACES AVANT LES '-' 
10020 PRINT " AUX COMMANDES D'UN HELICUPTERE' 

10030 PRINT "VOUS DEVREZ SAUVER VOS COMPATRIOTES" 

10040 PRINT "PRISONNIERS DU MONDE INTERDIT." 


10060 PRINT " VOTRE TACTIGUE:" 
10080 PRINT " TROUVER UNE FAILLE DANS SON ECRAN" 
10090 PRINT “MAGNETIQUE ET LE TRAVERSER (ATTENTION" 


= 
ч 
à 
m 


> 
ы 
e 
© 
27 


ENSU 
10120 PRINT "D'UN RESCAPE ET LE RAMASSER (SANS S'" 
0130 PRINT "ECRASER!) EN APPUYANT SUR LE BDUTON" 
140 PRINT "DU JOYSTICK" 

ENFIN, RETRAVERSER L'ECRAN MAGNE-" 
TIQUE (ЕН QUI'), PUIS SE PLACER JUST 
EN DESSOUS DU SÜPER-HELICOPTERE. АРР-" 
UYER SUR LE BOUTON POUR DEBARQUER LES" 
10200 PRINT "LES MALHEUREUX. (LE DECOMPTEUR DE" 
10210 PRINT "RESCAPES VOUS SIGNALERA SI LE, ,DEBRR-" 
10220 PRINT "QUEMENT S'EST BIEN EFFECTUE). 


10240 PRINT "NB: METTRE LE JOYSTICK DANS LE PORT 1" 


T 
10260 PRINT. "APFUYEZ SUR LE BOUTON POUR COMMENCER"; 
10280 IF STRIG(O)=1 THEN 10280:REM ATTEND BOUTON 
10290 quitur ERP NC :REM ЕҒҒАСЕ ECRAN 


40, 
eg, CHASSEUR 
ی‎ Qui sera le dindon de la farce 
ou le pigeon du jeu ? 
Certainement vous si vous ne prenez garde ã vos plumes 
car la chasse est ouverte 
Votre insatiable appétit risque de vous faire 
battre de l'aile. 


BUT DU JEU sible sur les merveilleuses petites graines (сгеих de votre nid douillet, 
Volez sous le feu nourri d'un chasseur qui gui vous sembleront délicieuses. La chose 


vise bien afin de vous poser au sol, si pos- ant faite, rapportez cette nourriture au Lancez le jeu en faisant RUN. 


7 РН But A$ (1) 
10 8 5000: 605UB 1000 
20 5080 1000: :GOSUB 2000: ?возив 3000:60SUB 4000 
40 GOSUB 2100:G0SUB 1100 
50 IF RND(0)<1/CHANCE THEN GOSUB 1100 
60 IF PIGE>O THEN 40 
70 PRINT "é":REM esc-shift clear 
75 SE O» O, O, O: SOUND 1,0,0,0 
ER PRINT “Voulez-vous jouer (D/N) "i 

0 INPUT R$: IF R$(1)= THEN PRINT "bn GOTO 20 
190 КЫШ " AU REVOIR . 


110 El 
999 REM (( INITIALISATION CHASSEUR )) 
1000 TIRX=0:TIRY=0 
Mc YB=20: DXB=0 
TURN 


REM (( CHASSEUR ET TIRS )) 

IF DXB=0 THEN R=RND (0) : рХВ= (ХО-ХВ) ¥ (R20. 5) 

COLOR 32:PLOT XB, YB: XB=XB+S6N (DXB) : DXB=DXB-SGN(DXB) : COLOR 0 
REM deplacement üu chasseur 

e gr ,A: IF 4-94 THEN FIN=1 


IF PAND LÔ) co, 4 THEN 1150 
REM une chance sur 4 de tirer 
IF TIRY>4 THEN 1150 
REM cherche un tir de 
COLOR 32:PLOT TIRX Тын (KS. XB:TIRY-YB-1:COLOR 124:G0SUB 1300 
SND=150:SOUND O, SND, 
GOSUB 1300: COLOR E PLOT TIRX,TIRY 
REM efface chaque 
IF TIRY<S OR T A THEN TIRY=4: SOUND 0,0,0,0:RETURN 
REM suivant si non valide 
ëch TIRY-1 
HE. le tir, test au but 
MET RX+SGN ( X0- LT RATE (RND (0) 1/CHANCE) 
GOSUB 1500 
1180 SND=SND-1:SOUND 0,5М0,6,15 
1200 COLOR 124:PLOT TIRX, TIRY 


каннын кк ررر مر‎ ООО: 


SNS IO ON ЕЛ E C G ШЕЕ Eee E 
ees STE nonon ENTER 0O0: 


1300 Pacate TIRX, TIRY, A 
1310 НЕ i E THEN FIN=1 


1999 БЫ ДЫ ІМІТ PIGEON ^^ 

2000 X0=35:Y0=3:FIN=0 

2010 RETURN 

2099 REM ^^ GESTION DU PIGEON ^^ 
2100 COLOR 32: Qu x0, YO 

2110 S=STICK(O 

2120 XO-X0-( (S59) (8210) +(8=11) ) 022) +1 (828) (S26) + (827) ) & (X0<35) 
2121 REM deplacement horizontale 

2130 Ү0=Ү0+((5=9) + (825) (S713) )* (Y0420) - ( (8714) + (8-5) + (8-10) ) & CYO?3) 
2131 REM deplacement verticale 

2135 LOCATE ХО,Үб,А 

2140 IF FIN-1 ÜR А=124 OR A=0 THEN GOSUB 4200:G0SUB 2000 


71 
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2141 REM si 


ir le PSE 
Em XI 


160 LOCATE X0, Vost, ñ: Gi 817 AND GRAIN-O THEN GRAIN-1*COLOR 160:PLOT ХО, YO+1: GRD-GRD-1 
2161 REM si prend une 
2170 IF XO=35 AND YO-: Ce AND | STRIS(0)= =0 AND GRAIN=1 THEN GOSUB 4100 
2171 REM si reussit а le rapporter 
2200 RETURN 
2999 REM ## ІМІТ DU DECOR ## 
PRINT "ë" 


3040 POSITION 26,0:PRINT " 
3050 POSITION 26,1:PRINT " 
3060 POSITION 27,2:PRINT " 


3070, E 36,3:PRINT " " 
3080 Б ІНЕ R 1-4 TD 10: :PDSITION S6.I:PRINT " ":МЕХТ I:GRD-O 


3999 REM ** INIT br Js ET PIGEON ++ 
4000 PIGE=5:PT=0 
RE pred O,1:PRINT "Score : ";PT:POSITION 0,2:PRINT "Nombre de pigeons : ";PIGE 


4099 REM дЫ MISE А JOUR DES POINTS ++ 
4100 GRAINZO:PT-PT*1:POSITION 8,1:PRINT РТ 
4110 IF Di THEN PIGE=PIGE+1:G0SUB 3010:G0SUB 4010:1F CHANCE>2 THEN CHANCE-CHANCE-4 


IETURN 
4199 REM ++ MISE ñ JOUR RES e ++ 
4200 PIGE=PIGE-1:FOSITION 
4210 ERINE «PESE: COLOR 32: NGRA i= =0 


2999 REM == CARACTERES GRAPHIQUES == 
5000 POKE 104, PEEK (106) Э: GRAPHICS 0 

5010 SETCOLOR 2,0, 0:SETCOLOR 1,0,8 

8020 PRINT. CIRE 125): :PORE 752,1” 

5025 POSIT ПЕТ. «РАТТЕМТЕТ QUELQUES INSTANTS..." 
S050 DLST=(PEEK1102) € 

5040 AL TO ia um PEEK (5734441) NEXT I 


EAD V:POKE AS eDLST«I, V:NEXT I 
5070 [Es Io 10 7:READ V:POKE 512+DLST+I,V:NEXT I 


5110 DATAS d 0, 68, we SCH "d 0,0 

5111 REM dessin de 

EE DATA 124,84, іші, S5, 254, 124,108,238 
9 

100 


> 
к 
© 
2 


REM dessin ga, bonhomme” 
999 REM REGLE DU JEU 

00 PRINT CHR$(125):REM EFFACE ECRAN 
10010 EAR 10,0:PRINT "---CHASSE AU PIGEON---" 


:PRIN 
10020 PRINT "CA Y'EST, LA CHASSE EST OUVERTE..." 
10030 PRINT "MAIS CETTE FOIS-CI C'EST VOUS LE" 
10040 PRINT "PIGEON !" 


10060 PRINT "ET BIEN QUE LE CHASSEUR RODE, VOUS" 
10070 PRINT "DEVREZ, POUR SURVIVRE, НАМЕМЕК DES" 
10080 PRINT "GRAINES DANS VOTRE NID" 

10100 PRINT > 

10110 PRINT "VOUS VOLEREZ DONC DANS LES AIRS (AVEC" 
10120 PRINT "LE JOYSTICK), PUIS VOUS DEVREZ VOUS" 
0130 PRINT "POSER AU-DESSUS DES GRAINES (SUR LE" 


І 
0300 IF STRIG(O)=1 THEN 
0310 FER writ 125) 


1 

10140 PRINT "SOL). ENFIN VOUS REVIENDREZ PRES DU" 
10150 PRINT "NID POUR LES DEPOSER (EN APPUYANT SUR" 
10160 PRINT "LE BOUTON)" 

10170 PRINT 

10180 PRINT "N'OUBLIEZ PAS du METTRE LE JOYSTICK" 
10200 PRINT MEL LE PORT 

10220 PRINT NT 

созда PRINT a PRIVE Z RUR НЕ ЖОРО TUN: FOUR COMMENCER"; 
1 

1 


B T EN. LES BONS BONDS 


nga Un jeu très amusant où le monde se dérobe sous vos pieds. 
Dans cet univers mouvant, 
vous devez défendre chèrement votre vie, 
afin de remplir votre mission tout en évitant de vous fracasser 
lamentablement sur le bas de votre écran. 


——— — ñ= 
soin de ne pas culbuter, et rattrapez au vol mentpas très stables. 

ces maudites balles qui vont et viennent. 
Sautez de colonne en colonne en prenant Ah j'oubliais... ces colonnes ne sont vrai- aites et suivez les instructions. 


7 DIM R$(1),PL(2,3) 


10 50808 5000:REM prepare l'ecran 
15 GOSUB 10000:REM AFFICHE REGLES 
20 POSITION 0,20:PRINT " 


R 
110 IF SCORE>500 THEN PRINT “BRAVO, CHAMPION !!";GOTO 150 
120 IF SCORE>200 THEN PRINT "Vous etes adroit, felecitations...":GOTO 150 
PRINT "C'etait pas convainquant !'!.." 


z 
Ti 
С 
- 
= 
* 
т 
2 
ri 

H 
3 
EI 
т 
= 
m 
š 
z 
EI 


: GOTO 20 

PRINT "AU REVOIR. .":END 

КЕМ жж ІМІТ DES PLATES-FORMES жж 

RESTORE 5160 

FOR 1=0 TO 2:FOR J=0 TO 3:READ A:PL(I,J)=A:NEXT J:NEXT I 
REM mobiles : coordonees х,у spas & variables de deplacement 
REM -- affichage -- 

COLOR 2:FÜR I-Ó TO 8:READ H:FOR J=19 TO H+i STEP -1 

REM boucles des colonnes, 

PLOT 1%4%5,0:МЕХТ J 

REM A SEL 

POSITION I*4+2,J:PRINT P$:NEXT I 

RETURN 


КЕМ ** DEPLACEMENT PLATEAUX ++ 
R 1=0 TO 2: X=PL(I,0) : Y=PL CI, 1) :DY=RL (1,3) 
1. des pleateaux 
:LOCATE X*1,Y-1,02:LOCATE X+2,Y-1,A%:POSITION X, Y:PRINT " A 
REM effacage et voit dessus 
POSITION X,Y-1:PRINT " T 
REM efface ce qu'il ¥ a dessous 
IF A1=0 OR А2=0 OR A3=0 THEN YH=YH+SGN (DY) : COLOR O:PLOT XH, YH 
REM si c’est une bonhomme 
Y-Y*SGN (DY) s PL (І, 1) =Ү: POSITION X,Y:PRINT P$ 
REM aff. plateaux 
О IF SÊN (DY) «0 THEN COLOR 2:PLOT X+1,Y+1 
1 REM affiche la colonne en plus 
0 IF ABS(DY)>1 THEN 1520 
1 REM si oscillation non fini 
0 DY=-SGN (DY) * (PL (I, 2) #2+1) :PL (I, 3) =DY 
1311 REM change, de sens 
1520 PL(I,3)=DY-SGN(DY):NEXT I 
1321 REM deplace d'un cran 
1350 RETURN 
REM — INIT POUR LA BALLE -- 
2000 XBA=INT (RND (0) #33) +3: ҮВА=0 
2001 REM coordonnees aleatoires 
2100 RETURN 
КЕМ -- DEPLACEMENT DE BALLE -- 
2200 LOCATE ХВА,ҮВА,А:1Е А-2 OR А-2 OR A=4 OR A=5 OR YBA-20 THEN GOSUB 2000: GOTO 2230 
2201 REM s’il š a quelque chose a la place 
:PLO „BA, YBA: YBA=YBA+1 


2211 REM efface e deplace la balle > 
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GEELEN 
40-00 O0-0 


OO-0-UI ье S sS cO 


ІЗІНЕ 


ACA e 
RORMOOLOSOUO SE SES 
= 
[=] 


2200 


RE! p re et latreale de 
2230 LOCATE XBA,YBA, 
2231 REM si sur le sal ou en bas 
2240 COLOR 1:PLOT ХВА, ҮВА 
2241 БЕП CAE la bàlle 


ЕТИН! 
2999 БЕМ ++ INIT DU BONHOMME ++ 
3000 XH=19:YH=16: SAUT=0:FIN=0 
3001 Del ТЕГЕНЕ: si saute, si tombe 


3099 БЕМ. дА DEPLACEMENT DU BONHOMME ++ 

3100 Е ХНі=ХН: 60508 4100: ТЕ FIN>0 THEN 3180 
5101 REM Sr les coords, voir 3180 si tombe 
МЕУ SAUT>0 THEN 5159 

5111 КЕМ si dans ш 


5121 REM entree des commandes 

5130 YH=YH- (GAUT<3) + (SAUT >2) : rëm (SAUT<S) +H: SAUT=SAUT+1 
5151 КЕМ deplacement dans le sau 

3141 REM si heürte quelque chose ou то! 


3151 үші test S'il rate 1 


le saut est bon 
3165 SAUT-SAUT*TST:GOTO 3190 
3170 Ет SAUT*TST:GOTO 5190 
3171 REN lors de la chute:il 


3181 REM lors de a chute:il tom 
3190 COLOR 9:3, Dei XH1,YH1: боб 9: YH=ABS (YH) :PLOT XH, YH 
3191 БЕЙ let le bonhomme sur ecran 


БЕТІ 
3999 SC Re INIT DU SCORE >> 


4099 REM << 

4100 IF ABS (XH БРА) >i OR ABS(YH- MESE THEN RETURN 

4101 REM pas de points si pas de 

4110 GOSUB 2200: SCORE-SCORE* 10: EDITION 11,22:PRINT SCORE: COLOR 


4111 REM mise a jour des poin 

4119 REM << UN BONHOMME El MOINS >> 

4120 NBH-NBH-1:LOCATE 34,22,А: PRINT NBH;" " 
AL RE REM mise a jour du hb de bonhomme 


EU 
4999 REM CARACTERES GRAPHIQUES =: 
5000 POKE_ 106, БЕЕК(1087-51 БАЛАН 0: SETCOLOR 4,0,0 
5010 SETCOLOR' 2 19 SE VE 
le tuk seur 


5030 DLST= WE fi NI #1 ) $256: GOSUB 7! 
5040 FOR 1=0 TO 1023:POKE REST PEER (5734441) : NEXT 1 


E 7 
5060 FOR 1=0 TO 37: READ Vi SS 251 2+DLST+I, V:NEXT I 
5070 pin РФ (3): P$="" 
5071 M Les caracteres entre " sont: ctrl-C, ctrl-D, ctrl-E 
5080 s CHR$ (125) 
5090 RETURN, 


5100 DATA 124; таа, 124, E 254,124,108,238 


dessin du personn, age 
DATA 60, 126, GER 2534 253,251, 102, 60 
REM dessin du bal 
DATA 241,235,241, 290, 241,235, 241,235 
REM dessin de la colonne 
pen 255,237, 255, 63, GC 0 

REM pla teau cote FERE 

DATA" 255, 170, 253, 254, Баз, 250,245,255 
КЕМ plateau partie centrale 
DATA P255, 1,145, 156, 112, 192, 128,0 
REM plateau cote droite 
DATA 6,11,4,4,22,16,5,-5,26,14,5,5 
REM plates-}. 'no2 , ‚©. 
DATA 8,11,14,16, 17) 16; 14,11,8 
5171 КЕМ donnees des haüteürs" 
2099 REM _ BRUIT DE FIN DE SAUT 
2100 FOR I-200 TO 120 STEP -7 
6110 SOUND 0,1,6,15: ERN I 
5120 SOUND 010, 0; O: RET 
8199 REM ` BRUlTS eg On A LA BALLE 
5200 FOR 1=40 TO 0 STE! 
6210 SOUND 1 in 5 ТАН NEXT I 


6220 SOUND S 

7002 POSITION 040 10:7 F APAT IENTEZ QUELQUES INSTANTS. . . ": RETURN 
9 REM REGLES’ D 

10000 PRINT HSN A ien E AR ҮДЕ AN 

10010 POSITION 15,0:PRINT 

10015 PRINT "QUE PENSEZ-VOUS: Ж 


ааа 
EE EE 
RI KEE 


Do 


at a 
F 4-2 OR A=3 OR А=4 OR A Si YBA=20 THEN GOSUB 2000 


п sai 
3126 EE :DXH= (826)+(S=7)- (S= 10)-(S=11):SAUT=(S=6)+(S=10)+(S=14):YH=YH-SAUT: XH=XH+DXH: GOTO 


3140 Fonds XH,YH,A: IF А-2 OR Aes OR А=4 OR А=5 OR YH=1 THEN GOSUB 3000:G0SUB 4120:G08UB 6100 
3150 LOCATE XH, YH+1,A:F КЕРЕ, aet) e Menni tenu en 1+ (A= 13) 

e 
(A232 OR А-1 OR Hina SAUT<>0 AND TST=0 THEN GOSUB 6100 


tombe 
SHER XH, DS А: YHzYH (ñ=: 22): IF A<>32 THEN GOSUB 2000: 60808 4120: 60808 8100 


4000 SCORE=0: Pa ON 3,22: PRINT "Score : O":POSITION 25,22:PRINT "Reserve : 5": NBH=5: RETURN 


32:PLOT ХВА, YBA:GOSUB 2000: RETUR 
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10020 PRINT "DE BALLES QUI TOMBENT 
10030 


T BON, RIEN DE 
10040 PRINT "ФЕ COLONNES HQUVANTES 


se BOF... 
10100 PRINT " MAINTENANT, IMAGINONS QUE CELUI-CI" 


BONNE CHANCE, ET N'OUBLIEZ PAS" 
10240 PRINT "DE METTRE LE JOYSTICK DANS LE PORT 1" 


Р 
10260 PRINT "АРРЏҮЕ2 SUR LE BOUTON POUR COMMENCER"; 
10270 IF STRIG(0)-1 THEN 10270 

10300 PRINT HRS (125) : REM EFFACE ECRAN 


10310 Ri в 
наса REA | 


L 
m3 PROF 

Sum wë" Et si nous retournions à l'école... 

MANY Vous allez grâce à «Prof» retrouver l'ambiance turbulante 


des cours de récréation quand nous chahutions 
sans cesse sous l'œil vigilant 
et parfois sévère du professeur. 


seur vêtu de rouge. Vous obtiendrez les joystick (le placer dans le port 1). Vous 
boutons en passant tout simplement des- êtes concrétisé par un petit carré jaune. 
Ramassez le maximum de boutons bleus SUS. Pour le lancer, il suffit de faire RUN, 


en parcourant la cour de récréation et en 
évitant de vous faire attraper parleprofes- Les déplacements s'effectuent à l'aide du —OƏO-.-`<.<— — or 


10 REM *** SAUVE-QUI-PEUT +++ 
11 REM 

12 REM 

15 

14 


15 REM 

20 RC=0:REM ІМІТ. RECORD 

50 BOSUB 1100:REM INIT. VARIABLE JEU 

$0 GOSUB 1000:REM INITIALISATION 

70 FJ=0:REM INIT. FIN JEU 

100 GOSUB 6000:REM GESTION BONHOMME 

110 IF RND(0)40.25 THEN GOSUB 6000 

120 GOSUB 7000:REM GESTION DU PROF. 

125 REM EFFETS DE POURSUITE: 

130 IF RND(O)<1/VI THEN GOSUB 7000 
F ЕЈ=0 DEM 100:REM SI INCHE CONTINUE 


156 REM RAJOUTE DES OBJETS ET 
157 REM EE BARIDITE DU PROF 


170 IF VI-O THEN VI-S:REM VITESSE LIMITE 

200 GOTO &0:REM RECOMMENCE UNE MANCHE 

299 REM ---ON A PERDU--- 

| 300 PRINT "Pour у SE sur le boi п." 


utor 
320 IF STRIG(0)=1 THEN 320 ЕМ ATTEND BOUTON 
340 GOTO 50:REM RECOMMENCE UNE PARTIE > 
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^ 999 REM --- INITIALISATION --- 

1000 GOSUE 2000:REM INIT. MODE GRAPH. 

1020 GOSUE 1200:REM INIT. BONHOMME 

1030 GOSUB 1300:REM INIT. PROF 

1040 GUSUB 8000:REM PLACE LES OBJETS 

1045 GÜSUB 9000:REM AFFICHE SCORE/RECOD 

1050 RETURN 3 
REM ---ІМІТ. VARIABLE JEU--- 

REM INIT. SCORE 

:VI-VVI:REM INIT. VITESSE PROF 

=VNO: OB=NO:REM INIT. NBRE OBJETS 


RETURN 
КЕМ --- PLACE BONHOMME --- 
1200 BX=INT (RND (0) *XM) : BX=INT (RND (O) XYM) 
1210 COLOR 1:PLOT BX,BY:REM AFF. BONH. 
1220 RETURN 

REM --- PLAI DE =># 


LACE PR 
1300 PXP=INT(RND(0)*XM):PYP=INT(RND(O)*YM) 
1310 LOCATE РХР,РҮР,7:1Ғ 7520 THEN 1300:REM SI DEJA QUELQUE CHOSE 
1320 COLOR 2:PLÒT PXP.PYP:REM AFF. PROF 
1330 RETURN 
1999 REM --- INIT. MODE GRAPHIQUE --- 
GRAPHICS 3:XM-40-1: YM-20-1 
2010 £020: 0 1=10:02=2: C3=4: SETCOLOR 0,0,01:SETCOLOR 1,0, C2: SETCOLOR 2,0, C3: SETCOLOR 4, 0, CO 


IRN 
4999 REM --- ENTREE DES COMMANDES --- 
5000 HL РҮ=0: AA=STICK (O) 


2010 Ай-14 THEN РҮ: : RETURN :REM SI DIR. HAUT 

5030 IF AA=13 THEN PY-1:RETURN :REM SI DIR. BAS 

5040 IF AA=11 THEN PX=-1:RETURN :REM SI DIR GAUCHE 

5050 IF 88-7 THEN PX-1:RETURN :REM SI DIR. DROITE 

5060 IF REM SI DIR. DI 

5070 IF 

5080 IF 

5090 IF Ай=9 THEN PY-1: :RETURN :REM SI DIR. DIAGONALE BASSE GAUCHE 
5100 RETURN :REM SI RIEN! 

5999 REM --- DEPLACEMENT BONHOMME --- 


&000 GOSUB 5000:REM VOIR SI COMMANDE 

6010 IF PX=0 AND PY=0 THEN RETURN :REM SI AUCUN DEPLACEMENT 

2020 IF (BX+PX<O OR BX+PX>XM) OR (BY+PY<O OR EY+PY>YM) THEN RETURN :REM SI SORT DE L'ECRAN 
6030 DX=BX+PX: DY=BY+PY:REM COORD. DU DEPLACEMENT 

6035 REM TOUCHE-T-ON OBJET? 


6500 
8050 IF 7-0 THEN 5100:ҚЕМ SI ON NE TOUCHE RIEN 
6060 IF 7-2 THEN ЕЈ=2: 50508 6600:RETURN :REM SI TOUCHE PROF 
6075 REM ON TOUCHE UN OBJET 
2080 OB-OB-1:IF 0Е-0 THEN SC=SC+100:G0SUB 9000:FJ-1:RETURN :REM SI JEU TERMINE 
6090 SC-8C*10:G0SUB 9000:REM AFF. SCORE ` 


F СЕ ANCIEN BONH. 
OORD. 
BONH 


AFFICHE РКОҒ--- 
:PLOT FXP,PYP:REM EFF. ANCIEN PROF 


6610 РХР=РХ! ХХ: РҮР=ЁҮР+РҮҮ: КЕМ NOUVELLES COORD. 
6620 COLOR 2:PLOT PXP,PYP:REM AFF. PROF 

6630 RETURN 

6999 БЕМ 


—DEPLACEMENT PROF--- 
РҮҮ=0 


РХХ=0: PYY= 
7010 IF РХР=ВХ AND РҮР-ВҮ THEN ЕЈ=2: 50508 6200: RETURN :REM SI ATTRAPE ВОМН. 
7015 REM SE RAPPROCHER DU ВОМН. : 
7020 IF РХР<ВХ THEN PXX=1 
7030 IF РХР>ВХ THEN PX 
7040 IF РҮР<ВҮ THEN PY 
7050 IF PYP>BY THEN PYY=-1 
7055 REM TOUCHE-T-ON QUELQUE CHOSE? 
7000 LOCATE PXP4PXX, PYP4PYY,Z:IF 2-5 THEN RETURN :REM SI ON TOUCHE OBJET 
7100 ERES 6600:REM AFF. PROF. 


7999 REM PLACE DES OBJETS--- 

OB=NO:FOR I-1 TO NO 

8010 X=INT (RND (0) XXM) : Y=INT (RND (O) жҮМ) 

8020 LOCATE X,Y.Z:1F 2<>0 THEN 8010:REM SI IL DEJA QUELQUE CHOSE 
8030 COLOR 3: FLÒT X,Y:REM AFF. UN OBJET - 


RETURN 
8999 REM ---AFFICHE SCORE/RECORD--- 


9000 IF SC>RC THEN К 
9010 PRINT CHR$(125);"SCORE= ";SC;" ` RECORD= ";RC 


9030 RETURN 
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BBC-ELECTR 


PUISSANCE 4 


ç Voici un logiciel de réflexion, 
où l'ordinateur se présente comme un adversaire de choix. 


E BUT DU JEU ] pions, soit horizontalement, soit verticale- [ж AU CLAVIER 

Le but du jeu est extrêmement simple, le Ment, soit en diagonale. - Ce logiciel fonctionne, sans aucune 

joueur gagnant est celui qui aligne quatre adaptation, à la fois sur BBC et Electron. 
68 CLS 


78 DIM A(S,7),KÇ73,N(20),G€7),RC2) 
80 FOR 1=1 TO 26 

90  NCI)=@ 

100 NEXT I 

118 NC 127. 01:NC2)5. 15NC32210:1NC42 21800: NCG) 2 1:NCLI22100 
120 IF R(1)=2 THEN 1788 

130 B$=" " 

140 R(1)=0:R(2)=0:B=0 

150 A1$="VOUS AVEZ GAGNE LA PARTIE" 

160 R2$-"J'RI GAGNE LA PARTIE" 

178 REM CHOIX DU ier JOUEUR 

188 MODE2:COLOUR133:CLS 


W2=RND< 28) tPRINTTRB(CU2 , W3) ; "x": NEXT 
288 COLOUR2:PRINTTRB(4, 15) "PUISSANCE 4" 
210 W1=INKEY(¢ 2000) :MODE1 


230 GOSUB 1468 

240 PRINT TRB(3,20);"Uoulez-uous commencer ? (O/N)" 
258 0%-бЕТ% 

260 IF O$-"N" THEN 490 

270 IF O0$-"O" THEN 280 

280 REM JEU DU JOUEUR 

298 C=C+1 

300 IF C=36 THEN 1250 

310 GOSUB 1630 

328 PRINT TAB(6,2@);"A vous de jouer" 

330 PRINT TAB(3,23); "Donnez le No de со1оппе":Х-бЕТ 
340 IF X<49 OR X>55 THEN 470 

350 x=x-48 

360 IF K(X)=5 THEN 480 

370 GOSUB 1638 d 

388 PRINT TRBC12,282; "OK en " 

390 PRINT TRB(18,200;X 

400 Y=5-K(X):ACY,X)=1 

416 VOU23,130,255,255,255,255,255,255,255,255 
420 KCX)=K(X)+1:Z$=CHR$( 130) 

L 338 GOSUB 1788 


190 FOR W3=1 TO 32 STEP2 : COLOUR4 : /2-RNDC 28) t PRINTTRBCU2 ,U3) ; "&  tCOLQUR 1: 


2280 PRINT TRB(2,102;"Le but du jeu est d'aligner 4 pions":WsINKEY(208ü8 
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FOR Ti=@ TQ 5й00:МЕХТ 

IF G{K)=1 THEN 1288 

GOTO 438 

PRINT TRB(3,282;"Un nombre entre 1 et 7 S.V.P":GOTO 338 
PRINT TRB(3,282;"Colonne deja complete.Rejouez":GOÜTO 336 
REM JEU DE L'ORDINATEUR 


C=C+1 

IF C=36 THEN 1250 

GOSUB 16380 

PRINT TRB(2,282;"Un instant.Je reflechis":FORWi1-üTO4G88:NEHTUM 


В=й 
Мей 
FOR Mei TO 7 
GOSUB 730 
IF TéM THEN 618 
M=T 
RM=X 
МЕХТХ 
ХтАМ 
GOSUE 1638 
PRINT TRB(6,202;"Je joue en ";TAB(17,20)X 
Y=5-K( X) 
ACY, X)=5 
K(X)=K(X)+1 
Z$=CHR$( 130) 
COLOUR 1:G0SUB 1700 


6=1 
GOSUB 730 
GOTO 280 
REM JEU 
PRINT TRB(CA«CSX4-22,160; "." 
G(X)=8:;T=0 
Y=S-KCK) 
IF Y<>0 THEN 800 
T=-1 
GOTO 1220 
IF Ү=5 THEN 848 
5-й 
FOR 1-1 TO 4:5-648(,7,Х2:МЕХТ J 
GOSUB 1668 
IF Y=1 ТНЕМ 880 
s=@ E 
FOR J=2 TO 5:858*RCI, H2 NEXT 
GOSUB 1668 
IF Х›4 THEN 978 
FOR D=1 TO X 

8-й 

FOR I=D TO D+3 

S=S+R(Y,I) 
NEXT I 

GOSUB 1664 

NEXT D 
GOTO 1846 
FOR D=X-3 TO 4 

5=@ 


FOR I=D TO D+3 
S=S+ACY, I) 
NEXT 1 

GüsUB 1664 

NEXT D 

A=X+Y 
IF Y=5 OR R>8 OR A<5 THEN 1090 
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| 1868 5=й 

1878 FORJ=1 TO 4: I-R-J:S28*R(J, ID :NEXTJ 

1888 GOSUB 1668 

1898 IF Y=1 OR Я›9 OR R«6 THEN 1139 

1188 S=0 

1118 FORI=2TOS: I=A-J: $= S+ACJ, I2: NEXTJ 

1128 GOSUB 1660 

1130 A=K-Y 

1140 IF Y=5 OR A3 OR Я‹ӣ THEN 1188 

1150 5-0 

1168 FORJ=1TOd: I=A+J:S=S+ACJ, I2: NERTJ 

1170 GOSUB 1668 

1188 IF. Y=1 OR A>2 OR Н<-1 THEN 1228 

1190 8-8 

1288 FORJ=2TOS: I-R*J: S-84RCJ, I):NEXTJ 

1218 GOSUB 1668 

1220 RETURN 

1288 REM COMMENTAIRES DU SCORE 

1240 GOSUB 1638 

1258 PRINT TAB(6,20):"Egalite,vous vous defendez bien":FORT1=0TO50008:NEKXT 
Ti р 

1268 GOSUB 1466 

1278 GOTO 280 

i288 GOSUB 1630 

1298 PRINT TRB(2,282;"Vous avez aagne":FÜRTISBTOSGQOQ:NEXTTI 

1388 RCIDERCIO 1 

1310 IF R(1)>2 THEN GOSUB 1590 

1328 IF R(1)>2 THEN 1780 

1338 GOSUB 1460 

1340 GOTO 498 

1350 GOSUB i638 

1368 PRINT TRB(6,205;"Desole,je joue en ";TRB(24,20)X 

1370  Z$-CHR$CL38) 

1380 Y=5-K(X) 

1390 COLOUR 1:G0SUB 1700 

1400 PRINT TRB(18,22);"et je gagne":FORTI=GTOSGGG:NEXTTI 

1418 RC2)=RC2)+1 

1420 IF R(2)>2 THEN GOSUB 1590 

1430 IF R(2)>2 THEN 1800 

1440 GOSUB 1460 

1450 GOTO 280 

1460 REM RFFICHAGE DU JEU 

1478 COLQUR130:COLOURG 

1488 FOR J=1 TO 7:G(J)=@:KC(J)=0:C=0 

1498 FOR Ізі TO S:RCI,J)-8:NEXT I 

18808 МЕҲТЈ 

1518 CLS 

1528 PRINT TRB(28,22; "PUISSANCE 4" 

1538 COLOUR1:MQUE1880,530:DRRU798,530: DRRW798, 1818 : DRRU188, 1810: DRRU1B0,53 
8 

1540 MOVE205,530:DRRU205,1010:MQUE300,530:DRRUS008,1010:MOUE408,530:DRRI4 0 
8,1018 

1550 MOVE495,S538: DRRUASS, 1010: MOUES9 0, 530: DRRUSSOB, 1818: MOVEGS5, 530: DRAWGE 
5,1010 

1560 MOVE188,625:DRRU798,625:MOUE180,728: DRRU798, 720: MOVE 180, 815 : DRRUZS B, 


815:М0УЕ 100, 910: DRRW?98, 918 


1878 VDU17,0:PRINT TABC4,17);"1 2 3 4 5 Б 7" 
1580 RÉ=STRÉCRE 1) ) t TS-STRSCRO2) 

1590 PRINT TRB(32,5); "SCORE" 

1600 PRINT TAB(28,7);"JOUEUR :";TRB(37,7)R£ 

1614 PRINT TRB(27,95;" BEC :";ТНВ(37,92Т% 

1628 RETURN 
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КЕМ EFFRCEMENT 
FORI=13TO26:PRINTTAB(1, 1); BE: МЕХТІ 
RETURN 
IF 5=3 THEN G(X)=1 
IF 5=15 AND B=0 THEN 1354 
Т-Т%М(6%12 
RETURN 
REM AFFICHAGE DES PIONS 
РКІМТТНВ( ЗҰХ%1,3жү-2)22%; ТИВ(ЗҰХ%2,2%Ү-222% 
РКІМТТНВ(З%ҰХ%1,3%Ү-122%; TRB( 3*X+2,3*Y-1)Z$ 
PRINTTRB(1,16)B#:FORT1=8TOS800:NEXTTI 
COLOUR @:RETURN 
IF R$>T$ THEN 1788 
IF R$<CT$ THEN 1890 
IF R#=T# THEN 1468 
GOSUB 1630 
PRINTTRB(S,245R1$:G0TO 1828 
GOSUB 1634 
PRINTTAB(S,24)A2$ 
PRINTTAB(7,26); "Voulez-vous rejouer ?(0/ND":UIS-GETS:IF Wi$="0" THEN 


PRINTTRB(26,28)2; "RU REVOIR..." 


END Е 


Leem MILLE-PATTES 


pe Aidez un mille-pattes à se nourrir, 
en mangeant un maximum de pommes. 


nez sur vos pas, c'est la mort certaine. adaptation. 
= BUT pu, JEU. Vous n'avez que trois vies, ne les gaspillez - Pour diriger le mille pattes utiliser les 
d faut guider un petit mille-pattesversdes pas! touches : x h 
ruits afin qu'il grandisse. Mais évitez les г 3 = haut 
rochers - indigestes - qui causeraient vo- AU CLAVIER * / = bas 
tre perte. Plus vous mangez de pommes, - Ce logiciel fonctionne sur les micro- * Z = gauche 
plus le mille-pattes ralentit. Si vous reve- ordinateurs BBC et Electron sans aucune * X = droite 


10 REM Mil'Pat 

20 

30 һіх=50:019_һіх=һіх 

40 ON ERROR GOTO 60 

50 HIMEM=&2E00:PROCinit 

68 VDU 22,7:PROCinstructions 

78 REPERT 

80 эсогех=@:11#ей=2:15сгеепй=1 
90 REPEAT 

100 VDU 19,CBORDX,cfondz;0; 19,CMPX,cfondZXZ;0; 19,CFRUITX,cfond#;@; 
110 PROCcolour_on 


120 PROCdata:PROüCwall:speedx-5ü*(S-screenz) 
130 REPERT 
140 IF INKEY-98 X%=-1 PHERDX=MLX 


150 IF ІМКЕҮ-67 X : Y4= 0: THERDX-MRZ 


d'ecran."; 


340 
350 
360 
370 
380 
390 
400 


410 
420 
436 
440 
458 
460 
478 
480 
490 
500 
510 
520 
530 
540 
550 
Sea 
576 
sea 
599 
600 
610 
620 
630 
640 
656 
; 
660 
670 
680 
690 
70а 
718 
720 
738 
748 


IF INKEY-73 Хх= 

IF INKEY-185 =1 

PTABXX=( PTABXZ ) ANS : ?P TABY4=C? TAB YA) +Y% 
ColX-POINT(?TRBRX32416, (31-2 TRBYX 2*32 416) 

IF colX-CFRUITX PROCfruit ELSE speedX-speedX-SPEED2* 

IF со1% AND 1 COLOUR CMPZ:CRLL HIMEM:PROCwait(speedX) ELSE PRO 


UNTIL ?LGTHX»zMRXLx 
IF col#<4 PROCnew screen 
UNTIL lifex<@ 
UNTIL FRLSE 


DEF PROCdata:LOCRL ix 

FOR ix=0 TO MAXL% ?CTABX%+i%⁄)=15:?(TABY%+i3⁄2 )=15: NEXT 
K%=11Y⁄=0:?LGTH%=2: ?HERD%=MR% 

ENDPROC 


DEF PROCinstructions:LOCAL ix 

CLS: VDU 23;10,32;0;0;й 

PRINT CHR$138;CHR$157;CHR$129;CHR$141; TRBC 16) "Mil'Pat" 

PRINT CHR$130; CHR$157 ; CHR#129 ; CHR$141; TRBC 16) "Mil'Pat" 

PRINT 'CHR$134;" Tu dois guider Mil'Pat" 

PRINT CHR$134; "vers les fruits afin qu'il grandisse," 

PRINT CHR$134;"tout en evitant les rochers." 

PRINT CHR$134;" Plus il mange moins il va vite ; et il"; 

PRINT CHR$134;"doit еп manger"CHR$131;MRXLX-2; CHR$134"pour changer 


PRINT CHR$134;" Si tu le fais revenir sur lui-meme" 
PRINT CHR$134;"il mourra et il n'a que 3 vies ..." 
PRINT '"Pour revoir les instructions" 

PRINT TRB(18)"appuie sur la touche ESCRPE." 

PRINT 'CHR$133;"Touches de controle :" 


PRINT 'CHR$134; "Haut "CHR$131":" 
PRINT CHR$134; "Bas "CHR$131"7" 
PRINT CHR$134; "Gauche "CHR$131"Z" 
PRINT CHR$134; "Droite "CHR$131"X" 


PRINT 'TRB(6)"Rppuie sur SPACE pour jouer.";:xFK15 

REPEAT UNTIL GET-32 

VDU 22,1, 23;10,32;0;0;0; 17,128 *CFONDX, 19,CFONDX, cf ond; 0; 
PROCcoléur. оп 

ENDPROC 


DEF PROCwall:LOCRL ix 

COLOUR CMP* 

PRINT, TRBC 16, 02 ; "Mil'Pat"; 

COLOUR CFRUITZ:PRINT TAB< 14, 0) CHRSMUX ; TRBC 24 , @ ) CHR$MUX ; 

COLOUR CBORD% 

PRINT TRBC2,22; STRINGS$(36,CHRSBDX) ; 

PRINT TABC2,28) ; STR INGS(C36 , CHR$BD1% ) ; 

FOR іх-2 TO 27:PRINT TABC2, iX )CHRSBDz ; TRBC37 , iX) CHRSBDz; : NEXT 

SOUND 8,2,6,18 

PRINT TRBC3,382;"Scaore : "i TAB( 15,30); "Record : "; TAB(28,30); "Reste 


PRINT TRB(3,312;"Uies : "jTRBC15,312;"Ecrans : f 

COLOUR CMPX:PROCnumerics 

PRINT ТНВ<11,312;5ТБІМб%С11Ғех,СНЕФМИУУ; 

COLOUR CFRUIT#:PRINT ТЯВ‹24,31) ; STRING&CS creenx-1, CHRSFRA) ; 

COLOUR CBORD% 

FOR iX-1 TQ screenx*3*18:PRINT TRBCRNDC33) *3,RNDC24) 22 CHRERCZ : NEXT 

COLOUR CFRUITX 

FOR іх-і TO MRXLX*1.5 
SOUND 1,-18,RNDC2802,1 
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760 
7780 
780 
798 


810 


860 


PRINT ТІ 
NEXT 

VDU 17,2,81,? TRBHX, ?TRBYX , MR, 17,1 

PRINT Тавс‹?твхх›+1, 2TABY3% ;" Pret !"y:PROCwait(7000)> 

PRINT TRB(C?TRBRAZO +1, ?ТАВҮХ) ; " м3 

ENDPROC 


ABCRND( 33) +3 , RND( 24 ) +2 CHRSFRA 


DEF PROCnumerics 

IF всогехоһіУ hi%=scorex 

PRINT TRBC11,80) score; TABC24,30);hi%; TAB(36,30);MAKL⁄-?LGTHX " "4 
ENDPROC 


DEF PROCfruit 
score#=scorex+escreen{ispeedx=s speedx+SPEEDX 
?LGTHZ-(?LGTHX)*1:80UND 1,1,?7LGTHX,8 
PROCnumerics 

ENDPROC 


DEF PROCcheck 

SOUND @,2,5,2@ 

?LGTH%=MAXL 3⁄4 

lifexX-lifex-1:colx-4 

IF 11Ғеу(0 РКОСҒіп ELSE РЕОСша1%< 12000) 
ENDPROC 


DEF PROCfin 

VDU 19,CMPX, cmp%EORS8; @; :*FX21 

IF hix»old.. hix PROCthemetune 

PRINT TAB(G,1)"est MORT ; appuie sur SPRCE pour rejouer* 
REPERT UNTIL GET-32 

ENDPROC 


DEF PROCnew screen 

LOCAL ix 

FOR ix-?LGTHX TO 1 STEP -1 
PRINT TRB(2(TRBXZ+iX),?(TRBYZ+i%))" "j 
SOUND 1,i%DIU3-15,iX*3,2 
PROCwai t( 1000) 
NEXT 

screenx=screenxz+1 

ЕМОРКОС 


DEF PROCwait(t#) 
IF tx»8 FOR tx-tx TO 0 STEP TRUE ï ï NEXT 
ENDPROC 


DEF PROCéolour_on 
VDU 12, 19,CBORDZ,cbordX; 0; 19,CMP%, cmp ; 8; 19,CFRUIT%, cfruit%; @; 
ENDPROC 


DEF PROCinit 
BD52224 !MC4=225!ML1=226 : MR4=227 : MU%=228 1 MD4=229 : RC4=280:FR4=281 
2:SPEED2 
:CFRUIT: 


CMP%=2:CFOND%=3 


cfruit mpzz8:cfondz-2 
&FFEE:LGTHX-2&70:HERDAZ-&71 
1319 MAXL4=40: ТАВХИ=НІМЕМ+&609 : TABY? TABX%+MAXL% +2 
1320 
1330 FOR (ep TO 2 STEP 2:Рх-НІМЕМ 
1340 COPT 1% 
1350 LDY LGTHX 
1388 LDA #31:JSR OSURCHX:LDR TABXX,Y: JSR OSURCHZ:LDR TABY%, Y: JSR OSWRCH 


1370 
1380 
1390 
1408 
1410 
1420 
1430 
1448 
1450 
x 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1558 
1568 
1578 
1588 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1678 
i688 
1698 
1788 
1718 
1726 
1730 
1740 


1750 NEXT 


1760 ENDPROC 


LDA #ASC(" "):JSR OSURCHX 

LDY #MAXL% 

-loopx 

LDA TABXX-1,Y:STA TRBXX,Y 

LDA TRBYz-1,Y:STR TRBYx,Y 

DEY:BNE loopx 

LDY #2 

.апіх 

LDA #31:JSR OSURCHx:LDR TRBXZX,Y:JSR OSWRCHZ:LDR TRBYX,Y:JSR OSWRCH 


LDA #MCZ: JSR OSWRCH% 

DEY:BNE anix 

LDA W31:JSR OSURCHX:LDR TRBXX:JSR OSURCHX:LDR TRBYX:JSR OSWRCHX 
LDA HERDX:JSR OSURCHX 

RTS: JNEXT 


ENVELOPE 1,1,3,2,-2,6,6,6,100,0,0,-5,100,0 
ENVELOPE 2,1,0,0,0,0,0,0,127,0, 0, 1,126,106 
VDU 23,BDX,&FF,&FF,&FF,&FF,&FF АРЕ, &FF AER 
VDU 23,MCX,36,24,189,126,126, 189,24,36 

VDU 23,MUX,66,36,24,126,219,126,60,24 

VDU 23,MD4,24,60,126,219,126,24,36,66 

VDU 23,MRX,16,57,106,252,252,106,57,16 

VDU 23,ML4,8,156,86,63,63,86, 156,8 

VDU 23,RCX&8,&1C,&3C,&3E, &7E , &7E  &FF ,&FF 
VDU 23,FRX,97,38,24,126,255,255, 126,60 
*FH9,48 

*FH18,8 

жЕХ23й0,1 

ENDPROC 


DEF PROCthemetune LOCAL @%,R%,N%,P% 
ENVELOPE3,3,0,8,0,1,1,1,126,-4,0,-4,126,80 
QZx=0:Rx=0 
FOR Nx=0 TO 60 STEP 4 
Px=48+<(Nx+(NXM0D12=8) 2М0016%4 
SOUND 1,3,Рх,5:500М0 2,3,0%,5:SOUND 3,3,Rx,5 
Кх-0У:0х-Рх 


Vous luttez contre un adversaire terrible. 
Aux commandes d'un bolide, 
faites le meilleur score, 

il en va de votre vie 


EE automobile. Seul le plus rapide gagnera, - Pour utiliser ce programme sur Electron 
— serez-vous à la hauteur ? les commandes de joystick sont rempla- 
En vous déplaçant dans une zone bien li- [ыр RAUBER | сёез par la saisie directe аи clavier. 


mitée par l'ordinateur, encerclez au plus AU CLAVIER 
vite le joueur adverse, grâce à la fumée ~ Ce logiciel fonctionne sur BBC avec deux 
que dégage le pot d'échappement devotre manettes de jeux. pertes, 
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sa 

60 

70 

80 

90 
190 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
278 
280 
290 
300 
310 
320 
330 
340 
350 
368 
370 
380 
398 
408 
418 
420 
4380 


ONERRORRUN 
PROCinit 
REPERT 
MODE 0 
PROCmenu 
MODE 1 
REPERT 
PROCcadre:PROCdepart 
REPEAT 
PROCdepl(i,FNpdl(1,2)) 
PROCdepl(2,FNpdlt3,4)) 
UNTILPZ(120RPXC2) 
IEN 1 )=M2(2)RNDYZ(1)=YZ%(2):P%(1)=1:PX(2)=2 
PROCcrash 
UNTILPt#(1)=80RPt4(2)=8 
UNTILFALSE 
END 


DEFFNpdlipZ,q 
A%=ADVAL p% : BX=RDVRL qX 
=-( A >B%⁄4 )#2-( (65520-A3% ) Ви) 


DEFPROCdep1(jX, tX) 

A%=K3 < j 3⁄4 ) BA ¿(j I Ви=ВХ+рХИС ЕИ): BX=BX+DYAC tH) 
COLOUR3:PRINTTABCHY( j %2 , VC j %2 )CHR$136; 
P“(jZ%)=POINT(RX*32+4,(31-BX)#32+16) 
COLOURjZX:PRINTTRB(fiX,BX)T$( tX); 

DEE : VC j % )=VPOS RAC j A= ë YC EE BY 
ENDPROC 


DEFPROCcadre 

VDU19,6,4;6; 
UDU41UDU23, 1,05 0: 0:0; 
UDLU19,3,2; 0; : COLOUR131:CLS 
PROCscore(1,18):PROCscore(2,3) 
UDU28,1,30,38, 3: COLDUR128:CLS 
UDU26:UDU19,3,6;0; 

ENDPROC 


62@ 
630 
648 


680 
690 


710 
728 
738 
740 
750 
7680 
770 
788 
790 
EL 
810 
820 
830 
840 
850 
860 
870 
880 
890 
900 
910 
920 
936 
948 
95й0 
968 
976 
988 
998 
1088 
1010 
1828 
1830 
1040 


БЕЕРКОСесоге()%,х%2 
COLOURjX:UDU31,xx, 1:PRINTPtX(jX) 
ENDPR0C 


DEFPROCdepart 

VDU19,1,1:0:19,2,3; 0; 
XZ(1)=30:YZ(1),=22:8Z(2)=9:YZ(2)=11 
COLOUR1:PRINTTRB(30,22)T$(2);:H%x(1)=P0S:Ux( 1)=UP0S 
COLQUR2:PRINTTRBC9, 112 T$C1) (2)3=POS:UX(Z)=UPOS 
SOUND, 1,7, 1: SQUND1, 8, 0, Ot х= INKEY188: SOUND1,0, 180,0 
ЕМОРКОС 


DEFPROCcrash 

VDUS 
IFP4{1)SQUNDO,2,6,5:UDU19,1,14;@3;:Pt2C2)=PtXC204#1 
IFP%(2)S0UND0,2,5,5:UDU19,2,11;0;:!Pt%(1)=PtX(1)+1 
НхХ<12-10%32:Ву-(32-9У( 1))#32 


Cx=(Hx(2)-1)%32:Dx=(32-UZ(2))*32 
FORIx-4TOS 
FÜRJX28TOS:RX-RND(32) 
UDU29 , R4; B%; 1GCOL3,, 1 : MOUEWX-RA , Үй: IFP%< 1 )\VDU136, 136 
VDU29 , CX 5D; : 6C0L3, 2:MOVEK%, Y *RX t IFP4C2)UDU136, 136 
Mëscht +YAD 1V2: Yus Y4-RXD IVZ 
NEXT 
NEXT 
w= INKEY158 
ENDPROC 
DEFPROCmenu 
М0019,0,4;0;19,1,3;0; 


Р+%(1)=@:Р+%(2)=@ 
ЕМОРКОС 


DEFPROCinit 

REM--- modifs hard --- 

*FX9,6 

*FA10,3 

REM--- enveloppes --- 
ENVELOPE1,0,0,0,0,0,0,0,127,0,0,0,112, 0 
ENVELOPE2,0,0,0,0,0,0,0,127,0,0,-1,126,8 
REM--- dessin des autos --- 
VDU23,128,60,60,36,231,255,255,255,219 
VDU23,129,219,219,255,219,219,24,60,68 
VDU23,130,248,248,127,243,243,127,248,248 
VDU23,131,31,31,196,255,255,196,31,31 
VDU23,132,31,31,254,207,207,254,31,31 
VDU23,133,248,248,35,255,255,35,248,248 
VDU23,134,219,255,255,255,231,36,60,60 
VDU23,135,60,60,24,219,219,255,219,219 
VDU23,136,0,56,116,100,58450,28,0 

REM--- pour imprimer les autos --- 
DIMT#(3) 4 
T$( @)=CHRE129+CHRE8+CHRE1@+CHRE128+CHR$8 
Т%( 1 )=CHRF131+CHR$8+CHR$8+CHRE138+CHR$8 
T$( 2 )=CHR#$133+CHR#8+CHR#9+CHR$132+CHR*8S 
T$ 3)=CHR$135+CHR$8+CHR$1 1 +СНЕФ134+СНЕФ8 
REM--- table des deplacements --- 
DIMDXX(3):DIMDYX(3) 
DxZ(0)=0:DYZ(0)=-1:DXZX(1)=1:DYZ(1)=0 
DXXC2)=-1:DYX(2)=8:DX4(3)=0:DY4(3)=1 
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1050 REM--- reserves coordonnees --- 

1868 DIMMZ(2):DIMYZ(2):DIMHZ(2):DIMUX(2):DIMPX(2) 

1878 REM--- divers --- 

1888 DIMPtzC2) 

1098 @x=10 

1180 ENDPROC в 


Un terrible bandit s'est échappé 
d'une prison réservée aux condamnés à mort. 
C'est sa dernière chance de sauver sa tête, 
il est prêt à tout. 


à d 


BUT DU JEU les directions, mais d'üne seule case à la * jouer - une lettre et un nombre - puis celle. 
fois. Le jeu est fini lorsqu'un des joueurs ае la case à détruire qui vous permettra de 

Devenu gardien de prison, vous devezrat- est enfermé dans un cachot. N'oubliezpas bêtir le mur. 
traper un hors-la-loi et le remettre dans que vous jouez contre l'ordinateur. - Ce logiciel fonctionne sans adaptation à 
son cachot. Pour cela, enfermez-le de- AU CLAVIER la fois sur BBC et Electron. 
dans, en construisant des murs indestruc- 
tibles. Vous pourrez circuler dans toutes Entrez la nouvelle position des cases à 

10 REM PRISON | 


20 DIM T(188),D(8),P(8) 

30 FOR I=1 TO 100:T(I)=1 

40 IF 1‹12 OR 1289 THEN Т‹1)=9 

50 ЯХ-І-10жІМТ( 1/10) 

60 IF X50 OR X=1 THEN Т(12-9 

70 NEXT I 

88 DRTR-1,9,-11,-18,1,-9,11,10 

90 FOR Ісі TO 8:RERD DtIO:NEXT h 
100 MODE2:COLOUR 134 : COLOUR 1 :CLS:PRINTTAB(7, 14) "PRISON": VDU 23;8202;0;0;0 


118 W1=INKEY(2000) 

120 MODE 1:COLOUR12@:COLOUR1:CLS:PRINTTAB(S,15) "Voulez-vous les regles <o 
ZND ?" 

130 REPERT:SOUND1,-18,RNDC2552, 18: R$2 INKEYSCOD : UNTIL R$="0" QR R$-"N" 

140 IF R$-"O" THEN GOSUB 580 

150 CLS:X2-INTCRND(CS82 4112: IF T(X2)>1 THEN 158 

160 T(K2)=2:PJ=X2 

178 X3-2INTC(RNDCB82 4112: IF. TCK3251 THEN 178 

188 T(X3),=3:P0=X3:T0=0 

198 VDU 23;82802;0;0;0; 

200 PROCcaracteres 

218 PROCterrain 

220 COLOURG:PRINTTAB(S5,25) "Voulez-vous commencer (OZN) 7" 

230 R=GET:IF R=79 THEN 420 ELSE IF R<>78 THEN 228 

240 REM JEU DU MONSTRE 

258 PRINTTAE(S,25)" a 

268 PRINTTRB(8,25)"Patience,je reflechis...!" 

270 H2-PJ:H3-PO 

280 Z-M3:N1-3 

.298 PROCtest Si 
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300 IF D-0 THEN PROCeff:PRINTTRB(5,25)"J'ai perdu en ";T8;" coups !":PRO 
Сіетро:РЕОСҒіп:ЕМО 

318. IF V<9 THEN PROCeff:PRINTTRB(5,25)"Je sens ma fin proche !":PROCtemp 
o 

320 T(D(D)+K3)=8: TC Mäi 1147243 

330 М-3:50ЦМ01,-10,990,15 

340 Е=2:РЕОСсаѕе:Х=КЗ+0(р):РО=Х:Е=1:РЕОССаѕе 

350 Z=X2:NI=1:PRINTTAB(S,25)"Quelle case vais-je detruire ?" 

360 PROCtempo 

370 COLOURI 

380 PROCtest 

390 PROCeff 

400 T(X2+D(D))=S:N=5:X=X2+D(D) 

418 SOUND1,-10,660,15:E=1:PROCcase 

420 Deg 

438 K=-1:REPERT:K=K+1:IF T(D(K)+M2)>1 THEN 450 

440 D=D+1:X=DC(K)+X2 

450 UNTIL K=8 

468 IF D=@ THEN COLOURG:PRINTTRBC1,252 "J'ai gagne en ";T8;" coups !":PRO 
Ctempo:PROCf in: END 

47@ IF D<4 THEN COLOURG:PRINTTAB(5,25)"Je sens votre fin proche ! "IPR 
OCt empo 

480 REM JEU DU JOUEUR 

490 IF D=1 THEN PRINTTAB(1,25)"Vous n'aviez plus qu'une case possible":P 
ROCtempo:PROCeff:GOTO 520 

500 COLOURG:CS$=STRE(D):Wit="Ucus avez ":W2$=" coups іоуаһҺ1ес..."іНФ-ы1ж% 
CH+W2$ 

S10 PROCjoueur 

520 T(X)=2:T(X2)=1:T0=T0+1:N=2:PJ=¥ 

539 E=1:COLOUR 1: PROCcase:X=X2:E=2:PROCcase: COLOURG 

540 A$="Quelle case detruisez-vous " 

558 PROCjoueur 

568 T(K)=S:N=5S:E= 1: COLOUR1:PROCcase: COLOURG 

57@ GOTO 250 

586 COLOUR128: COLOUR2:CLS:PRINTTRB(12,2)"REGLES DU JEU" 

590 PRINTTAB(6,5)"Vous etes le gardien de prison et vous devez remettre 
au cachot un affreuxbandit.Vous pouvez pour cela construire un mur que per 
sonne ne pourra desormais plus detruire," 

600 PRINT'" Les deplacements se feront dans toutes les directions mais 
d'une seule case а la fois.Vous donnerez la ligne. et la colonne pour i 
Lndiquer la case de votre choix (ex:C4)" 

618 PRINT'" Le jeu est fini lorsque l'un des deux antagonistes ne peut 


plus bouger.S'il ne vous reste plus qu'une case libre alors l'ordinateur 1 
а jouera pour vous." 
620 PRINT'''" RPPUYEZ SUR 'ESPRCE' POUR COMMENCER" : UDU 23;8202;й0;й;й; 
630 R=GET:IF В< 5232 THEN 630 ELSE COLOUR130:RETURN 
648 STOP 


650 DEF PROCtempo 

668 i--1:REPERT:i-i*1:UNTIL i=800 

678 ENDPROC 

688 DEF PROüCjoueur 

698 PROCeff:PRINTTAE(S,25)A$; :PROCtempo 

788 INPUT C$ 

718 IF LENCC#)<22 THEN PROCeff:PRINTTABCS, 25)" INCORRECT. . . "i PROCtempa:PR 
OCeff:GOTO 698 

720 M$-LEFT&(CE, 1) 

730 IF Иж‹"Н" OR X$>"H" THEN PROCeff:PRINTTRB(S,25)"Ligne incorrecte..." 
:PROCtempotPROCe£f£:GOTO 698 

740 Y$-RIGHTS(CS, 1) 1 

750 IF Y$("1" OR Y$>"8" THEN PROCeff:PRINTTAB(S,25)"Colonne incorrecte.. 
.":PROCtempo:PROCeff:GOTO 690 

768 L-RSCCX$)-64:C-RSCCY$)-47 
L ES 
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po:PROCeff:GOTO 690 

798 IF LEFT#(R$,1)<>"U" THEN 840 

888 ISB:REPERT:I-I*1: IF ABSCX-X2)=DC1) THEN I-8:UNTIL ‘1=8:G60T0 вай 

818 UNTIL 1-8 

820 PROCeff 

830  PRINTTRBC8,25) "DEPLRCEMENT INTERDIT... ":!Wi=Wi+1:UNTIL Wi-2BBrPROCef 
f:GOTO 694 

848 ENDPROC 

858 DEF PROCtest 


778 X=L*10+C 
788 IF T(M)4?1 THEN PROCeff£:PRINTTRB'5,25)"Case deja occupee...":PR0Ctem 


860 I=-1:REPERT:I=I+1:P(I)=0:UNTIL I=8 

878 1:REPERT:I=I+1:IF Т(240(12221 THEN 960 

880 7--І:БЕРЕНТ:1-7%1 

890 IF D(I)=-D(J) OR T(Z+D(I)+D(J))>N1 THEN 948 

зав K=-1:REPERT:K=K+1 

310 IF DCK)=-D(J) OR T€Z+DCI)+DCJ)+D(K))>1 THEN 938 
920 > P£1)=PCI)+1 

938 UNTIL K-8 

948 UNTIL J-8 


358 GOTO 978 

960 Р‹1)=-1 

978 UNTIL 1-8 

980 D=0:U=0 

990 I--1:REPERT:I-I*1:IF Р(12<У THEN 1018 

1000 D=I:U=P(I) 

1816 UNTIL 1=8 

1020 ENDPROC 

1@3@ DEF PROCcase 

1040 X-X-1:U-INTCKR/18)0:U-4-UX*18 

1858 K-2129-4*(N-3)-8*(N-5) 

1860 IF E-2 THEN K=32 AND K+1=32 AND K+2=32 AND K+3=32 

1070 IF E=2 THEN K=32 

1888 PRINTTRB(C184(2*U) , 4+4 2#U))CHR$K 

1090 IF E-2 THEN K=31 

1188 PRINTTRB(1Oü*C2xU*10 , 4 £C 2XUD OCHRSCK * 12 

1118 IF E=2 THEN K-38 

1120 PRINTTRB(184C2*UD , 4*4 C2XU* 12D CHRECK*22 

1188 IF E=2 THEN K=29 

1148 PRINTTRB(184(2xU* 10 , 4 £C 2XU * 2D CHRSCK*32 

1156 ENDPROC 

11680 DEF PROCeff 

1170 IS283:REPERT: I2 I*1:PRINTTRB(C 0, І)" 

":UNTIL I-28 

1188 ENDPROC 

11298 DEF PROCfin 

1288 PROCeff 

1218 РЕІМТТАВ‹ 1,25) "VOULEZ-VOUS REJOUER (0/М2 ?";:R-GET:IF R=79 THEN RUN 
ELSE IF R<>78 THEN 1218 

1220 PRINTTRB(15,382 "RU REVOIR....":END 

1238 ENDPROC 

1248 DEF PROCterrain 

1250 GCOL a, 3:MOVE383 , 383: DRRUB95 , 383: MOVE383 , 447 t DRRUB9S , 447 : MOVESBS , S111 
DRAUB9S , 5 1 1 :MOVE383 , 575 : DRRUB95 , 575 : MOVE383 ,639 : DRRUJ895 , 639 : MOVE383 , 783 DR 
RuJ895 , 783: M0UE383, 767 : DRRUB95 , 767 

1260 MQUE447,328: DRAW447 ,826:МОЧЕ51 1 , 320 : DRAWS 1 1,826 : MOVES75 , 320 :DRAWS7S ; 
826:MDUE639 , 324: DRRUle39 , 826 : MOUE7 83 , 326: DRAW7 03 , 826 : MOVE 767,320:DRAW767,82 
&:MOUVES31,320: DRRUB31,826 

i278 COLOURG:PRINTTRB(12,32"12 3 45 6 7 8"; TRBC9,7) "A"; TRBC 9,9) "B"; TRBC 
9,112 "C"; TRBC9, 13) "D"; TRBC9, 15) "E"; TRBC9, 172 "Р"; TRBC9, 19) "B" TRBC9 210 "H^ C 
OLOUR1 1 
| 1288 N=S 


88 


еы 


FOR Ізі TO 188:IF TCI 

1300 NEXT 

1310 K=K2:N; PROCcase 

1320 M-H431:N-3:E-1:COLOUR?G : PROCcase: COLOUR2 

1336 ENDPROC 

1340 DEF PROCcaracteres 

1350 UDU 23,129,15,31,31,63,63,127,99,127 

1360 VDU 23,130,240,248,248,252,252,254,198,254 

1376 VDU 23,131,127,126,127,59,29,14,7,7 

1380 VDU 23,132,254,126,254,220,184,112,224,224 

1398 VDU 23,133,64,96,60,63,119,49,127,63 

1400 VDU 23,134,2,6,60,252,238,140,254,252 

1418 VDU 23,135,252,61,255,56,115,55,31,21 

1420 VDU 23,136,63,68,255,28,206,236,248,168 

1430 VDU 23, 137,0, 123,123,0,239,239,0,123 

1440 VDU 23,138,0,222,222,0,123,123,0,222 

1450 VDU 23,139,123,0,239,239,0,123,123,0 

1460 VDU 23,140,222,0,123,123,0,222,222,0 | 
" 


THEN PROCcase 


1478 ENDPROC 


p 
"P LES CHENILLES 


Une chenille folle, 
que dirige votre adversaire, vous menace. 
Faites vite, car elle essaye 
de vous encercler ! 


gner, il faut agir vite, en gênant le plus ~ Sur l'Électron, la gestion des joysticks 
- possible l'adversaire. Tous «les coups» est remplacée par la saisie directe au cla- 

A l'aide de fils de fer barbelés, neutralisez “оп! permis II! vier, 

au plus vite la chenille de votre adversaire. 

Bien sûr, si l'une des chenilles essaie de 

traverser le barbelé, c'est la mort qui l'at- -Ce logiciel nécessite l'utilisation de deux 

tend au bout de cette aventure. Pour ga- manettes de jeux sur le ВВС. 


10 REM CHENILLES 
20 


30 *FX229,1 

40“0М ERROR PROCerror 
56 MODE 1 

60 PROCinitialise 

78 

80 REPEAT 

90 PROCvitesse 

100 REPEAT 


110 PROCstart 

120 REPERT 

130 DDX=FNpoint(DX,cdX):PROCplot(DX,cd%X) 

140 DGxX=FNpoint(GZX,cg9gZ):PROCplot(6X,c9x) 

150 PROCwait(Ux) 

160 IF X%(G%)=X%(D%⁄) AND Y4(G4)=Y4(D4) DG%=TRUE : DD%=TRUE 

170 UNTIL DG%+DD% 

180 ' PROCexplose(C6%,CD%) :PROCwait( 300) 

190 UNTIL SCX(GX)2MSX OR SCX(DX)=MSX NES 
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208 
218 
220 
230 
248 
250 
260 
270 
280 
298 
300 
310 
320 
330 
340 
350 
360 
370 
388 
390 
400 
410 
420 
430 
440 
450 
468 
478 
480 
498 
500 
510 
520 
530 
540 
550 
560 
570 
580 
590 
600 
610 
620 
630 
640 
650 
660 
678 
68@ 
690 
700 
710 
720 
730 
740 
750 
760 
770 
780 
790 
800 
810 


UNTIL FRLSE 


DEF PROCplat(j#x,c#) 
COLOUR c%: PRINT ТАВИ ји), YXCj4O 2 3 CBCDZCJX201 
ENDPROC 


DEF FNpoint(j%,cx) LOCAL RX,B*X 

COLOUR cX:PRINT TRB(XX(jX),YZ(jZ)):C$; 
РКОСр41(3%2 

XZ(CjZ)=%Z(jZ)+DXZ(DZ(j2)) 

YZ j 2 )=Y%C j 3⁄4 Y +D YC DC j %4 ) ) с 
zPOINT(16432x45(j42,82*(82- YX Cj 422-16) 


DEF PROCpdl(jX) LOCAL A%, B% 
AZ=ADVAL( j %+j % +1) :B%X=ADVAL ( j 3⁄4 +j % +2 ) 
DZX(jZX)=-(RX>BX)w2-((&FFF0-RX)5BX) 
ENDPR0C 


DEF PROCcIS(Y%) 

VDU 19,cb%, CF%; 8; 
COLOUR 128+cbx:CLS 

VDU 28,1,MY%-1,MX%-1, Y 
COLOUR cf%:CLS 

VDU 26, 19,cbx,CBX; 0; 
ENDPROC 


DEF PROCstart LOCAL іх 
PROCc1sCGGO:PROCscore 
PROCcol1C(CGXEOR15, CDXEOR1S) 
Mart G% 228: H4 CD4) 2 MAX-HACGA ) 
ҮУ(6У2-10: Y4CD42 2 MY 827 CH 
REPERT 
PROCpdl1CGX) :PROCplot(GX, сох) 
PROCpd1(D%) :PROCplot(DAZ, сах) 
UNTIL ¿(ñDVRL(0 )ñND3)=3 
SOUND &0010,-6,7,254 
FOR іу-й TO 255 STEP 15-VZDIV2:SOUND 1,0,iX,1:NEXT 
PROCcol1(CG%,CD%) 
SOUND &01,0,0,0 
SOUND &10,2,0,255 
ENDPROC 


DEF PROCwait<T%):T%=TIME+T%:REPEAT UNTIL TIME УТ: ЕМОРКОС 


DEF PROCvitesse LOCAL у%,х%,УХ 

PROCcIs(1) 

РКОСсо1(<С6%,С0%2 

COLOUR 128+cb%: COLOUR cg% 

уже" D.H E N T: L ЕСЕ 16.8 

x%=LEN( v$) : y%=( 38-x3⁄4 ) / 2 

PRINT TAB< y%⁄, 2) ;STRINGE( xZ+2 , МФ) 

PRINT ТЯВ‹ vs, 3); M$; STRINGSC хи," ");M$ 

PRINT ТНВ(у%,42;М%;у%;М% 

PRINT TRB(yX,S);M$;STRING$(xx," ");M$ 

PRINT TRB(yvX,6);STRING#( xX+2,M$) 

COLOUR cfX:COLOUR cdx 

x4=9 Ч 

PRINT TAB{3,x%)"Le but du jeu consiste a empecher" 
XX-2xX*2:PRINT TAB(3,x%) "votre adversaire d'avancer." 

хит PRINT TAB(3,x#)"Une partie se deroule en 5 points." 
xZ=x%+3:PRINT TRBC3,xX)"Guelle vitesse voulez-vous 1/3)?" 
SOUND &8818,-6,3,255 


*FX 21,0 
REPERT 

SOUND: &8011,-6,RNDC256)-1,18 

UX-URL C INKEYS1 0) 

UNTIL Ux»8 AND Ux(4 
SOUND &8810,0,0,0 
ENVELOPE 1,4,-11,-11,0,4-Ux, 4-. 9%,0,127,-2,-1,-1,126,80 
ENVELOPE 2,4,-4,127,8,1,1,4-U%,100,-20,0,0,126,57 
Ux=4s(3-Ux%) 
SCx(Dx)=0:SCX(Gx)=0 
ENDPROC 


DEF PROCscore 

COLOUR cfX-128:COLOUR cbx+128 

PRINT TAB< 10, 12: SC4CGX) ; TRBC30, 125 SC (DS ; 
COLOUR c Fx: COLOUR cbx 

ENDPROC 


DEF PROCexplose(CGx,CD%) 

SOUND &0010,1,2,80 

IF DD% CDX-CDX EOR 15:SCX(6X)=SCx(6Z)-(DG 
IF DG% Сби=С6и EOR 15:8CX(DX4)-SCXC(DX)-(DDxX28) 
PROCcol(CGX,CDX» 

FROCscore 

ENDPROC 


DEF PROCcol(CG#,CD%) 
VDU 19,c9X,C8x;0; 19,cdX,CDX;0; 
ENDPROC 


DEF PROCinitialise 
DIM KXC12, YXC12,DX4CI) , DXA4CS2 ,DY4 CS) ,C$C3), SCXC12,CHIFFRE$(C9,7) 
Оххс 00-0: DYZ(0)=-1: DKC 1)=11 DYxCiD- à: Duer Sie DYXC25- 8: Du Sie 8:DYX 


F%=32:F$=CHR$(F%) 
M$=CHR$128:C$=CHR$129 
FOR ІУ-й TO 3:С% 1%⁄)=CHRECASCCCS)+14+1%⁄ d) : NEXT 


tcox=2:cbx=23 

Срх=4:С6х=1:СВх=2 

16Ұш1:М5х-5 

280,0 

16,4 

9,6 

18,6 

23,RSCCM$),&FF,&FF,&FF,&FF,&FF,&FF, &FF,&FF 
23,R8C(C$),&24,&18, &BD, &7E, &7E, &BD, &18,824 
23, ASCCCSCA)), &E?, &24, Aar, &ЕЕ, &99,&99,&FF ,&3C 
23,R8C(C$C12),&79,&49, &CF , &FC, &FC,&CF,&49,&79 
23,RSC(C$( 252), &9E, &92, &F3, &3F, &3F,&F3,&92,&9E 
23,RSC(C$C3)),&3C, &FF, 499, &99,&FF,&3C,&24,&E7 
ENVELOPE 2,129,1, 8, 8, 2i а, 8, 128,-10,-1,-1, $a, 4 

VDU 23,1,8; 0;6;0; 19, cix, CEs; Dr 19,cbX,CBZ; ER 
PROCcol(C8z, CDx)- 

ENDPR0C 


DEF PROCerror 


VDU 4, 12, 20, 23,1,1;0;0;0; 
*FM 9,25 
SEN 10,25 
REPORT:PRINT" at line ";ERL:END 
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COMMODORE 64 


VAMPIRES 


Trois vampires ne cessent de vous harceler 
dans le but de se repaître 
de vos globules, ó combien indispensables 
à votre survie. 
Heureusement, vous détenez le seul 
pistolet à honte de l'univers. 


[ BUT DU JEU matérialisé à l'écran. Quand les trois AU CLAVIER 


monstres se seront simultanément em- 
Afin de vous protéger des vampires qui pourprés, vous récupérez alors votre li- - Le viseur se déplace à l'aide des cur- 
vous sollicitent, faites-les rougir à l'aide quide vital. Méfiez-vous, les monstres re- seurs. 
de votre super-pistolet, dont le viseur est prennent vite du poil de la bête. - Tirez avec la barre d'espacement. 


КЕМ 


E 


BREBRERBIJSRNG" :ЕТ=1 : 0080803 
PÜKEO*21,0:DIMRCS» 
:01=6:С2=6:С3=6 

ТЕРДЕТЕТ ЕЕЕ [TTTTTIT) 12547 787 QU АЛАЛ, 
TIIIIIIIIIIIIIWOUS AYEZ BESOIN DE LUNETTES... " 
Еф-"ТТІТТІТІТІІТІТЕ”ЕЗТ DE LA PURE FOLIE..ADIEU.! " 

E$=" ДЕШЕТ a QUEL NIVEAU DE DIFFICULTE š 

8 РКІМТ!П!:РОКЕЗ3280,0:РОКЕ53281,0 

1 PRIHTE#$ 

2 


BB: vu=200: A 


FRINTC# 

3 INPUT ЕТИ"; F 

14 1ЕСР=10ЕР=20ЕР=ЗОКР=4>ТНЕН16 
15 FRINTAS: FORT=1T059@:NEXTT : GOTO1@ 

16 IFPz1THEHDL-32088 

17 IFP-ZTHEHDU-2G88 

18 IFF=3THENDU= 1408 

19 IFP=4THEHNDU=500 : PRINTES :FORT=1T01006:NEXTT 
P :PRIHTV£$ : GOSUB113:GOTO42 


EOS СЛ Ф CO RO =>‏ تن AD‏ سر مر مم 


27 IFTI-T12DUTHEH 
28 IFTI-T2>DUTHER 
29 IFTI-T32DUTHEH 


32 IFCCVHZRI-B2 BINDGCVHCZBAS2 2 AHD EB-122RHDCVVcBA822THEHC 
33 IFCCVH2C RIHDCVHECHB2 BHD (YY2D= 122 AND NN Da 2 THENG 
34 IFCCVHZE-BORINDCVHCEFB2 2RHDCCVV2F- 122 AND WWF 822 THEHCS 
35 РОКЕ53281,11:ЕОЕТ=1Т015:НЕЯТТ:РОКЕ5З281.,@ 

36 FORH=15TOBSTEF-3: POKEY , Н: РОКЕМ, 65 :РОКЕТ. 15: POKEH, 57 :PDKEL , 172: HEXTH 
37 РОКЕМ, а: POKET , а: RETURN 


тїзїї 
T2=TI 
T3=TI 
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48 RE ЕЕЕ ЕЕН ЕЕ 

41 REM ----------- COULEUR 

42 POKEO+33, 8: FOKEO+48, C1 :FOKED+41 , C1 : POKEO+42, C2 

43 POKE0+43, C2: POKED+44, C3 :POKED+45, СЗ 
p | Hi 


48 IFVVCSBTHEHVV- 
49 IFVV2228THENVV-z28 

S8 IFA>249THENA=246 

51 IFC2248THEHC-248 

52 ІРЕ>24ВТНЕМЕ-240 

53 IFE<SGTHENE=59 

54 IFCCSOTHENC=SI 

55 ТЕН<5@ТНЕНН=5й 

56 IFBC1GGTHENE=1G6 

S? IFDCIBBTHEHI-188 

58. IFFCIBBTHEHF- 1688 

59 IFB2188THEHB-1860 

68 IFD2188THEHND=180 

61 IFF>188THENF=189 

62 REM MOUVEMENT VRMPIRES============= 

63 FOÜRMEGTOS: RCM SINTCRNDCO2K3) 712x190: MEXTM 

64 REM RCTURLISRTIONH---------------- 

65 Ек50:5-5%1:ІҒЗ-2ТНЕМК-?6:5-й 

66 R=R+R<0):B=B+R(1)2:C=C+R<2): D=D+AC3) :ESEHRCA) :F=F+AC5) : GOSUB22 
67 КЕМ -- CODRDONNEES----------- 

68 POKED, VH: PÜKEO-*1, VV 

63 PÜKEU*2,R:PÜKEO*3, B: POKEO*4, A: POKEU*5, B: POKEO*6, C: POKEO*7, D: РОКЕО+8, C 
76 РОКЕО+Э, 0: РОКЕО+10,Е:РОКЕО+11,Е:РОКЕО+12,Е:РОКЕО+13,Е 

7.1 REM Ses ИРАКЕ ОН к езе ESS 

72 0050822 :РОКЕО+21,Е+1 

73 IFRT=1THENTA=TI 

74 RT=ÿ 


76 TTSINTCCTI-TR2/685 :PRINT"71Bi" ; TT;" SECONDES" 

77 IFS0>=2018THEH115 

i ee IFCS=6THENCS=9 : 0780-46: POKESO, 168: POKESO0454272, 0 
3 

88 КЕМЖЖЖЖИЖЕ ЖЖЖ ЖЖЖ ЖЖ Ж ЖЖЖ 

S1 КЕМЖЖЖЖЖЖЖЕРЕ I TE SHEAR AA ЖЖ ЕЖ 

82 КЕНЖЕ ЖЖЖ 

ӘЗ 0=93248 : FORA=GTO? :РОКЕ2040+Я, 19248: NEXTA 

84 FÜRA= Е 


86 RETURN 

8? КЕМ VISEUR—————————— 

88 DATA 8.112,8,0,32,0,0, 32, 0,0, 32, 0, 9438; 
89 DATA128, 4,8, 295, 143,248, 128,0, 8:0, 32,5 
Эй DATA 8,32,й,0,32,0,0,32,й,0,112,0,,, 
91 КЕМ VAMPIRE ñ AILE HRUTE+--———— 

32 DATA ,128.0,2,26,0,12,56,68,56,94,108,244,15,255,224,7,85,192,3,57,128 
93 DATA 0,144,0,,,,,;,,,,,),;).. 3333 у улл әк л» әләк, ea 

94 REM VAMPIRE A AILE БЯ55Ее-----<---- 

35 ШНТНӘ,68,0,й,108,8,7,255,192,31,85,240,127,57,252,252,146,62,144,0,17 
96 رود رر ددد دد رد د1818‎ EE TEE EE دودو ودد‎ 

97 REM VAMPIRE B AILE HRUTE-—————— 

98 DATA ,128.й,2,96,0,12,56,68,56,94,108,244,15,259,224,7,85,192,3,57,128 
33 DATA ER 144,06,,);); rss ss sas қақы nr sd 424710-4 8D E 4D 

100 REM VAMPIRE В AILE BRšSšSEc—————— 

i81 ПНТН,8,68,0,0,188,8,7,255,192,31,85,240,127,57,252,252,146,62,144,0,17, 
102 ШНІН,;,;,;;;);)) و ډور رو وور وړو ورو رر رو رر ررد رر ررر‎ 


103 REM YAMPIRE C AILE HAUTE 66444+4444 


39 REM#######CORPS PROGRAMME ######### 
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DATA. 128. 0, 2. 96, 0, 12, 56, 68. 56. 94. 108, 244, 15,255, 224, 7, 85, 192, 3, 57, 128 
105 DATA 8,144,й,,,,....) ооо, 

186 REM ҮНМРІБЕ С AILE BASSE144444444 

187 .ШНТН,8,68,0,0,108,0,7,255,192,31,85,240.127,57,252,252,146,52,144,0,17, 
198 DATA, sss 

109 REM SUPPLEMENTRIRE——————— 

119 DATA, 
ТОШТО 
112 REM SP DU SANG 

113 50=2053:ЕОВІ=17024:50=50-49:РОКЕХО, 168: POKESO+54272, 2: HEXTI ` 50-50-49 
С1=6:С2=6:С3=6 : RETURN 

115 КЕМ SOUS PROG DE МОКТ#ЖЖ#ЖЖЖЖЖЖЖЖ# 
116 РОКЕО+21,0: FRIHTUZ : PR THT "AM 
117 FRIHT"YOLS ETES MORT.": 
118 PRINT" ЕЕЕ ТЕТЕ ТЕТЕ ТЕТЕ ТЕШ ШШ! 
119 PRINT". «APRES UNE LUTTE DE " 


"d LE KID 


Sous vos yeux se déroule un duel 
sur lequel vous allez engager de grosses sommes en dollars. 
Tout irait bien si vous n'étiez pas l'un des protagonistes 
de ce face à face mortel. 
Méfiez-vous, les réactions de votre adversaire 
ne manqueront pas de vous donner des sueurs froides. 


LILLLLLLLIMH 


j "SECONDES" :ЕОКТ=1Т04000 :HEXTT:RT=1:G0T0S e 


BUT DU JEU fortune, laissez faire le Commodore 64; il bas et haut, utilisez les curseurs. 
se chargera de tout. Bon courage et bons - Tirez à gauche avec «A» 


Misez sans oublier que, plus le pari sera réflexes. - Tirez à droite avec «D» 

conséquent, moins vous aurez de balles AU CLAVIER - Tirez en ligne droite avec «S» 

dans votre chargeur. A vous d'étre plusra- - - Accélérez avec «Shift Space» 

pide que votre ombre. Pour calculer votre - Pour les déplacements droite, gauche, - Revenez à vitesse normale avec «Space». 


1 REM ALE KID" 

2 REM TILT COPYRIGHT 1984 

3 REM 

4 PRINT "2" : GOTOSO 

5 POKEU 129: POKER. 15: POKEH, 49 : POKELL , 208 : FORL=15T09STEP-1 : POKEWY, L :МЕХТІ. 

6 POKEM, û: POKER, 9 :RETURH 

ve POSEERUS ea K 'POKESO+C2#07+1 , 7-4: POKESO+(2%12 , X: POKESO+ (281) +1 , YY: у= 
8 RE 

9 POKESO+ (240) , X: PDKESO* C2W8) H1, V : POKESO+ (241) X: POKESO (2%11 +1 , HA ime 
10 RETURN 

11 FOKESO+C2#0) MAN : POKESO+C2#0)+1 , T : POKESO- COX15, +V : POKESO+C2#19+1 , Y: Mea 
12 RETURN 


13 POKESO+<2#0) , 4-V: POKESO-* C205 +1 , Y : POKESU* COK12 , SN" POKESO+C2#1 +1 i Rat! 

14 RETURH 

15 МС=МС+1 : HA=1+INT CRND(O) ABS (ABS CH=HF 32 :RI=INTCRNIC12#53+1 : IFHR2100THEHHRIS18 
16 X4TeX:VT2v:PÜKESOt21,119: IFCU#="A"THENZS 

17 IFCU$z"S"THEN32 

18 FORYT="Y+15T0YF-35STEP-35: XT=XT+INTCABSC CXT+XF-FHACHA) 2/205» 

19 1ЕХТ>25@ТНЕНРОКЕ50+21,115:60Т022 

26 РОКЕЗ0%(2Ж22,ХТ:РОКЕЗ0ж(2Ж22%1,ҮТ:МЕЯТТТ 

1FXTSCKF-7) ANDAT<CXF +1 1 2 THENGÜSUBS : GOSUB48 : GOSUB91 

POKESO+21, 115: XT=X: Tz V: POKESD+<2#29 , 4T: POKESOt C22) +1, T: GOSUBS 


ТЕНС=НВТНЕННС=Й: 5050896 
RETURN 
FORYT=Y+15T0YF-35STEP-35 : XT=XT=INTCABSCCAT+HF-FNACHA) 5220) 
IFATC18THENPOKESO-421, 115: GOTO29 

POKESO* C222 , XT : POKESO4+ (242) 1, VT: NEXTYT 

IFAT CRF -Y 2RNDATCCHF 1 12 THENGOSUBS: GOSUB48 : GOSUBS1 

POKESO*21, 115: XTe T2 ` PDKESO- C22), KT : POKESO* C221, VT: GOSUBS 
ІЕМС-МВТНЕММС«й: GOSUBS6 

RETURN 

FORYT=Y+15T0YFSTEP-15 

POKESO- (2425 , 4T : FOKESO+C2#25+1 , YT: HERTVT 
IFXT2CMXF-72ANDXT<<XF+1 1 THENGOSUES : BÜSUB48 : GOSUE91 

POKESO+21 , 115: fent" YT=Y : POKESD C22), XT: POKESO+ 2423 +1, VT GOSUBS 
ТЕНС=НЕТНЕННС=0 : 6050886 

RETURN 3 

XT=XF : TSF : POKESO*21, 119: FÜRvT-vF1BTÜvV-1SSTEP15 
KT=KT+H15#CDI DHL CHR D2 CHE D > 
IFKT41522500RAT-15C18THEHPÜKESO*21, 115 : GOTO4S 

POKESU* (242) , XT+15 : POKESO+C2#2) +1: YT+15: MERTVT. 
IFXT2X-10ANDXT<X+1BANDYT2YANDYT<Y+25THENJT=1 : GOSUES : GOSUB48 : GOSUB91 
FOKESO*21, 115: T2: T2 : POKESO+C 242) ; XT: POKESO* C2K2 +1, YT : GOSUBS : RETURN 
DF=INT(RNDE23#10) : SD=+1 : IFXCXFTHENSD=-1 
F=XF+<CDF#SD) : IFF>2S80RF<18THEHNF=0 : RETURN 

POKESO+(2#4) , F : POKESO+( 2%42 +1 , YF : POKESO+< 2#5) F :POKESO+C2#5)+1, VF 

POKESO- C26) , F : POKESO+C2#6)+1 , YF : HF=F :F=B : RETURN 

POKESO+21 , 123: EX=K+5 : EY=Y+16 : IFJT=GTHENEX=#F : EY=YF 

POKE S0+(2#3) , Ex : POKESO+( 2439 +1 , EY: FORT=1TO1889: NEXTT : NC=9 : RETURN 
DEFFNACHA) = INT CSOKCHA/505 > 

S0=53248: 2108: =200 : XT=200 : YT-208: XF=175 : VF=58 : POKES3280, 0: POKES3281, 7: V=1 
YY=54296 :1=54276 : A=54277 : H254273: LL=54272 : NB=8 : Y=5 ` PR=1 

GOSUB 118: GOSUB?7 :GOSUB1 3: PRINT "TELE ILS ARRIVENT ...!" 
ЕОЕН=ЙТП6:РОКЕ2@4й+Н, 192+H:NEXTN 
FORSR=(648(192+0)>T0(64%(192+6)3STEP64:F0RL=B8T062: READA : PDKESR+L A: HEXTL. 
NEXTSA : PRINT" TESNININISININININIBINISIRIRININTRIN] m" 

POKESO* C24) , 4F :PÜKESD+(C284)5+1 , VF : PÜKES0+(285) WF: POI 5341 ; YF 
POKESU- C262 , WF : FOKESO+C2#67+1 , YF :POKESO+C2#2), +10: POKESO+C24#2941 Үй 
POKESO* 245 , 4 : POKESO+( 240 1, Y: POKESD+C281)5, 8: POKESO+C2#19+1 V 
РОКЕ8П»(2Ж32,0:РОКЕ50(2Ж32%1,0 

POKESO+21 ; 119: POKESO+39, 8 :POKESO+46.; 2 :POKESO+41, B: POKESO+42, B: POKESO+42, 1 
POKESO+44, 2 : PDKES0+45, 0: POKES0+23, 3: POKES0+29, 3: PFOKESO+27 , 252 

GETCUS : IFCUS= "TI THENHV=5 : 505087 

IFCUS=CHRS € 160) THEHY=26 

IFCUS=CHRS (32) THEHY=16 

IFCU$=" W" THENV=5 : GOSUB9 

IFCU$="M" THENGOSUB1 1 

IFCU$="WHPTHEHGOSUB13 

IFCUS="A"ORCU$="S"ORCU$="D"THENGOSUB1S 

IFY<173THEHY=179 

ІҒҮ>1ЗӨТНЕНТ-196 

ІЕЖ>232ТНЕММ-232 

ІЕХ<24ТНЕНХ-24 

ONRIGOSUE44, 35, 38,38, 44 

IFRI2s2THENGOSUE3S 

z1:G0T063 

PRINT": PRINT " MRM" :PRINTTRECS);"SRECHRRGEZ VOTRE PISTOLET . MMMM" 
PRINT" 851 VOUS GAGNEZ UN DUEL RVEC:":PRINT"1 BALLE LA PRIME SERA DE 12864" 
PRINT"2 BALLES LA PRIME SERA DE 640#":PRINT"3 BALLES LA PRIME SERA DE 2206" 
PRIHT'"4 BALLES LA PRIME SERA DE 168$":PRINT"S BALLES LA PRIME SERA DE SG" 
FRIHT"& BALLES LA PRIME SERA DE 43%" :РЕІНТ"? BRLLES LR PRIME SERA DE 20#" 
PRIMT"S BALLES LA PRIME SERA DE 19$":PRINT "Am" 

PRINT" ЕМ PERDANT UN DUEL VOUS PERDEZ AUSSI UNE PARTIE DE VOS GAINS" 
IHFUT"COMBIEN DE BALLES"; МЕЖ: IFVAL CHEE) 2EORYALENEED 1 THEHPRIHT "TM: ;GOTOS4 
FORER=1TOYALCNES#) : GOSUES : NEXTER : NB=VAL (NES à : БЕТПЕН 
PRINT" ; "sg: :PRIMTTABCS) ; "A PLUS DE MUHITIOHS !!! " 

PRINTTRB(72;"MM VOUS ETES Н LA MERCI DE" 

PRIHTTAB(E » ; "M VOTRE ADVERSAIRE " 
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188 IFPG/MDC-2a8RNDPG/ND21880THENDI-A.? 


i81 IFPG/MDC-188THENDI-8. 6 

182 КЕТПЕН 

183 PRINT "TI" :PRIHT" Ww д) алаша" 

104 РКІНТ" ағала! Шап ШШЕ "PRINT" иа "тті ий "йт" 
105 PRIHT" ағай Ші ғай i": PRINT" kia "ат Ga шп" 

196 PRINT" иа чип на ш Зай a " 

10? PRINT"? üa m Fa së a М 

108 PRINT" RA ай aC 

109 PRINT" "баны À “Pomme 2 auem]? 8I/ A "Element d 

118 FRINT"O LW ' a = as ай k 

111 PRINTTAB(C29) ; "Tad " :PRINTTRBC2B) ; "7а ! 

112 PRINTTRB(275; "ud " :PRINTTREC26) ; "Лай A 

113 PRINTTAECZE "sl AU Я mu:PRINTTRB(26): "7 Qm й sia" 
114 FRINTTAB(26) ; am à Ces. :PRINTTRB(Z62; "7 йт À "ia" 
115 PRINTTAB(26); "87 ЯШ à W"SPRINTTRB(265;"7 Am 9 d 

116 PRINTTAECZED "wl qm — d 5 S'":PRINTTRBC260; "A Am F +a Ё 
117 РЕІНТТАЕСЭ3> ; "TOIL" : PRIHTTRBCS3) ; " 2—1" : RETURH 

118 PRINT" : PRINT" ДИТИ" 

119 PRIHTTREC145;"8 ":РЕ1НТТВВС14›;"@ LE KID ":PRINTTRBc145;"d 1 
120 РЕІНТ" ЮМ" :РЕІНТТАЕ‹8): "99 UM JEU DANGEREUX ..." 

121 PRINT 4eCRSRM DEPLACEMENT DROIT":PRINT" @5Н1НТ «СЕ5ЕШ DEPLACEMENT GAUCHE 


122 PRINT" MtCRSRM DEPLACEMENT BAS" :PRINT" mSHIHT 1CRSRE DEPLACEMENT HAUT" 

123 PRIMT"M DAM TIR A GAUCHE" PRINT" #SW TIR DROIT":PRIHT" 08 TIR A DROITE" 
124 FÜRPF=XFTOGOSTEP-1 :FOKESO+8 , FF :POKESO+ 10 , PF :POKESO+12, PF : HEXTPF : KE=PF 

125 FORPL=XT0248 : POKESO , PL:POKESO-*Z PL : NEXTPL : 4=PL 

126 PRINT" PRESSEZ ЙӘРНСЕШ POUR SUITE":PRIHT" ЖЕ POUR FIN" 
127 GETGE$ : IFGE$=""THEN127 р 

128 IF GE$C>" "RHDGE#$<>"£"THEH127 

129 1FGE$="£"THENPRINT "2" : END 


139 RETURN 
131 ШНТНй,126,0,0,126,0,0,11.й,3,255,192,4,255,32,й,255,0,0,255,й,й,126,0,0,60 
132 DRThO.8,24,8,0,0, 0, 0, 0, 0, 0, 6, 6, 0, 0, 0, 0; 126, 0, 1, 198, 128, 1, 128, 128, 8, 128, B 


133 ПНТНй,й,й,й0,0,0,3,231,192 


134 DRTR8,8,0,0,0,0,0,244, 0,0, 8, 8, 0, O 

125 DRTRiZE,1,255,128.1,126.128,1.126,128.1,8,128,0.126, 0,8, 126, 0, 0, 182, 0, B 
136 ІНТН182,0,й,102,0,0,0,0 

137 ІНТНй,192,0,0,192,0,0,0,0,0,0,0,0,0,й,0,й,0,й,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
198 ПНТНй,0,0,0,0,й,0,0,0,й,0,0,0,0,0,й,0,0,0,0,0,0,0,0,0,й,0,.0,8,Й 

139 JATA B, B, D. 1, 0, 0, 0, 0, 2 1, B, E, 3, 0, 4, 2,0, 3, 92 32, 1 206,64 B, 127, 0, 2, 127 128 
148 DRTH1,63,258,2,63.224,0, 111, 128,8, 198, 16, 1, 5, 128, 0, 5, 0, 8, B, B, 0, 4, B, B, 0.0 
141 ІНТНй,0,0,0,0,0 

142 DRTRO,8,8,0,0,0,0; 0,0, 6, 0, 0, 6, 153, 8, B, 255, E, 0, 231 B, E 126, E B 36, B, 0, 24,0 
143 DATAG, 8,0, 8,8,0, 0.0, 0, 8, D, E, B, 0, 0, 1, 0, 128, 1,8, 128. E E ELE 0, 0, 8, D D, 0,06 
144 ПЕТНй,0,0,0,0,0,0,244,0,8,0,0,й,0,0,й,й,й,й,й,й,й,0,0,0,24,й,й,й,й,1,252 
145 ІНТВ128,1,255,128,1,126,128,1.126,128,1,й,128,й0:126,0,0,126,0,0,102,й,0 
146 ШНТН1й2,0,0,102,й,0,0,й 

147 DRTRB.126.8,8,126,0,8,11.0,3,255.192,4, 182, 32, 0, 0, 8, 0, 24, B, E, D, OO OO, EU 
148 DATAG, 0,0, 0. 8,0, 0,0, 0, 0. 0, 0, 0, 8, 126, E, 0, 128, 8, 0. 125, 0, 0, 128, B, E A,B, GL 
143 DRTF3,231,132 


PRIHTTRBE(52;" GUI PREND TOUTES VOS PRIMES" 

PRINTTABCS) "M SOYEZ PLUS VIGILANT ! ":PFR=B:G0SUB124 
POKESO*21,8:ND-ND*1:IFJT-1THENPGEINT(CCNBZ182XPD2 : GOTOS3 
FLz18*C(2 TLO-HB2 2 : PG=<PG+PLI#PR 

PRINTO"; "MEMI" :PRINTTABC 14); "4 SCORE BENEEHENI BENOS GAINS :"; PG "$" 
PRINT" MMA GRACE AUX PRIMES QUE VOUS ONT RAPPORTES" : PRINT ЖҰБЫН; 


PRINT" VOS ";HD;" П0Е 452" 
PRINT" SOIT :";INTCPDeMD2; "$ PAR DUEL" 
Pë) : GOSUB1 24 : GOSUB77 : GOSUB193 : JT-8: IFPG/ND>7SBTHENDI=1 


IFPGZ/NDCE?58RHDFG/ND2308THEHDI-, Э 
IFPG/NDC-38GRNDPG/ND2208THEHDI-G, 8 


,8,8,0,8,0, 0, 0,0, 0,24, 0, 0, 0.0, 1,255 


ES 


Vous êtes а bord d'un hélicoptère 
et vous survolez un terrain accidenté où rôdent 
les dangereux missiles cruise de votre charmant adversaire 
qui ne rêve que d'une chose, rester seul en jeu. 


P d HELICRUISE 


BUT DU JEU adversaire. D'autant plus, qu'en cas de - «T» vous permettra de tirer. 
mauvais calcul, il n'est pas exclu que vous - Les directions sont ` 
Hélicruise se joue à deux. Le missile que deveniez votre propre cible. Bon vol. Nord-Ouest : Q | Sud-Est 
vous transportez a une autonomie varia- AU CLAVIER Ouest : A | Est 
ble. Il faut donc tenir compte de la topogra- Sud-Ouest: Z | Nord-Est 
phie des lieux si vous voulez toucher votre - «A» vous permettra d'avancer. Sud X | Nord 


FRIHT"Z":CLR:RESTORE:GOSUB 83 

K=3: T=3 : UB=255 : VB=128 : UN=69 : VH=VB 
HE$z'"TJMHELICO BLANC... ЯЭНЕНУЯНСЕ OU STEIR" 
DI$z"WOUELLE DIRECTION Q,W,E,D,C,4,2,0U Н 777" 
HN$z"7] MIHELICO HOIR...8 dEREVRNCE DU ATBIR" 
РОКЕУ%21,3 

POKE 5328й0;0:РОКЕ53281,9 


| 


= ONIN OL OONN d 


PRINT" Z 
17 PRINT" g 
18 PRINT" ZZ 
19 РОКЕ2023, 160: POKES6295, 6 

20 FÜRR-OTOSO 

21 В-ІНТ(67ЭЖЕМП(022%1204 

22 POKE В,233:РОКЕВ+1,223:РОКЕВ+54272, 7 :POKEB+54273, 0 
23 NEXTA 

24 IFT=3THENSS 

25 IFCe2THENC-G 

26 РОКЕМ+21,3:СР=0:Р=0: С: 
27 PRINT"'HN 
28 IFC=2THENDE$=HN: 

29 IFC=1THENDE#=HB#:UM=UB:VM=VB+10 
30 PRIHTDE$; 

31 бЕТИФ:1ЕМФ%=""ТНЕНЗ1 

32 GOSUB 80 

33 IFC=2ANDR=2THENS=12 

34 IFC=2ANDR=GTHENS=S 

35 1FC=1ANDG=GTHENS=S 

36 IFC=1ANDG=1THENS=12 

37 1РЫ$="Т"ТНЕНТ=1 

38 IFW$="A"THENT=0 

39 РЕ1НТ"Л1";р1% 

40 GETV$:IFV$=""THEN33 


=C+1:REM REPARTITION NOIR BLANC 


:C 
:D 
«E 
m 
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41 IFV$-"Q"THEHMI--10:J--18 
42 IFV$-"MW"THEMI-8:J--18 
43 1FV$="E"THENI=+10: 
44 IFV$z"D"THEHI-*10: 
45 IFV$-"C"THEH 
46 IFV$z"A"THEMI-B:J 
4? IFV$-"Z"THEHI--10:J-2*18 

48 IFV$z"R'THEHI--18:J«8 

49 GÜSUBSO:REM EFFRCE 

S8 IFT-1THEHOZIHTCRHDC124805 :0=0+20:К=7 

51 IFT=BTHENO=10 

52 FORH=GTOÙ 

53 RH-UM:RVzVH: 1F5=12THENAH=UM+255 

54 EH=UB: EV=VE : IFG=1THENEH=UB+255 

55 CH=UN:CY=WH: IFR=2THENCH=UN+255 

& PR=1024+(( CAVY-66)/82#32)+0C EECH 

ІЕРЕЕКСІМТ АРЕ 3=233THENI=C INT END: 1 2#4)-23#10: Je CIHTCRNDCÓOW42- 2018 
IFC=10RT=1THENUN=UN=T : Mei! : 0=8 

ORT=1THENUB=UB-1 : YB=YB-J : Ü=B 

66 UB=UB+I:VB=VB+J : UN=UN+T : VH=VH+J : UM=UM+ I : Veto A 

61 IFUB>25STHENG=1 : UB=UB-255 

62 IFUH>255THENR=2 : UN=UN-255 

63 IFUM>255THENS=12:UM=UM-255 

64 IFQ=1RHDUB<@THEHUB=UB+255 : Dep 

65 1FR=2AHDUNCOTHENUN=UN+255 : Кей 

66 IFS=12ANDUMCØTHENUM=UM+255 : 5=9 

67 IFS=DANDUM<SGTHENI=-1 

68 IFYMC6BODRYM>209THENJ=-J 

53 IFS2GANDUM>SDTHENI=-1 

70 POKEV+3, UE : POKEV+1 , VB: POKEY+2, UN: POKEY+3 VN 

71 POKEV*4, UM: POKEV+S, VM: POKEV+6 , UM: POKEY+7 , VM 

72 CP=CP+1:PÜOKEV+16, Q+R+S : POKEY+21 ; K 

73 IFCRH2BH-15RHDRHCBH*15)2RNDCRV2BV- 1 5RNDRVCBV*15)2RNDH»20THENUs10:GQTO103 
74 IFCRH2CH-1S5RMDRHCCH*152RHDCRV2CV-15RNDRVCCV&15»RNDH220THENUSS : GOTO 16:3 
75 IFT-1THENCPzO 

76 IFT-30RCP-3THEHGOTO2S 

(7 IFT-ATHENGOTO4G 

78 NEXTH 

73 GOTO24 

80 FÜRB=1994T0 
81 PRINT "mI 


83 v=53248 

84 FÜRR-BTUS:PÜKE2O4OG*R, 192*R: НЕХТА 

85 FOURE=@T0251 : READE : POKE 12288+B, E: NEXTB 

86 DATA ,,.,,,,,,›,,255,255,1268,1,192,17,@,128,1@ 

87 DATA 21,255,255,63,255,254,103,255,209,65,252,,255,248, 
88 DATA 255,248,,63,208,,15,192,,72,64,,127.248, 

89 DATA ,,,,,,...,, 5 

90 DATA ›,,,,,,,,,,,,1,255,255,136,3,128,8@,1, 

31 DATA 255,255, 248, 127,255,252, 136, 255, 6 

92 DATA .63,2,,31,255,,31,255,,11,252 

93 DATA ,3,240,,2,18,,31,254,,;;,,,,,.,; 

34 DATA ,224,,,224,,,224,,,,,.,,),....); 

95 DATA ,,,,;.;,;;,.,,.,,., 

96 DATA soso 

97 DATA ,128,16, ,64,24,48,56,61,224,8,63,192,15,255, , 3, 255. 
ЭВ DATA 224,242,224,63,212,255,15,248,240,3,240,192,255,219,192 
92 DATA 31,255,192,1,252,224,1,127,240,2,245,248,7,254,125 
188 DATA 15,254,7,15,126,2,28,99,,48,65,,224,65, 

101 POKEW+39, 1 :POKEW+49, B: POKEY+41 , 7 : POKEY+42, 1 

102 RETURH 

183 FORR=1TOS:FOKE V+21,U:FORT=BT0106 : NEXTT : POKEY+21 , 15-0: NEATA: GOTOL 


READY, 


Gu STARFALL 


Découvrez l'ambiance des chaudes nuits étoilées. 
La soucoupe volante qui va et vient 
sans cesse parmi les météores, 
c'est vous !... 


BUT DU JEU qu'un seul espoir : votre intervention sal- AU CLAVIER 
vatrice. Vous pouvez éteindre les incen- 


À l'aide de votre vaisseau, interposez- dies en soufflant dessus, grâce à vos - Déplacer la soucoupe volante à l'aide de 


vous entre les étoiles filantes afin d'empë- 


cher с 


dans le petit village isolé qui n'a plus 


КЕМ STARFALL 


330 


puissants réacteurs. Attention, deux in-. VOS curseurs habituels. 


es dernières de semer la panique  Cendies sont envisageables, mais trois... 


barre. 


REH 


КЕМ 


50701590 

КЕМ POSITIONS SOUCOUPE 

IFU>250THENU=255 

IFUC25THENU=25 

IFv<45THEHU=45 

IFV>230THEHv=230 

FOKEU+S, J: POKEU+7 , V : POKEU+8, 0: POKEW+9 , V : RETURH 

REM PASSAGE AYANT SCENE AUTORITAIRE 
FORLY=YTOLY-1G0STEP-5 : POKEW+6 , U : POKEMW+7 , L'Y : POKEW*8. U : PFOKEMW+5S s LV: HERTL V :HL=0 
Pele Ee АДЫ 
REM POSITIONNEMENT ETOILE1 
ЕізіІНТ(ЕНП(42%2002%40:51-ІНТСЕМП(52Ж502%40 

POKEVO, 15: POKEMO, 129: FOKEHF , 28 : POKEBF ; 194 : POKESO, 255 
РОКЕМ%(2Жй),Е1:РОКЕН%С2Ж02%1,51 
AC=PEEK{H+21 +210: POKEM+21 , AC :A1=1 : RETURN 

REM РО5ІТІОММЕМЕНТ ETOILE 2 
E2=1INT(RND(4)#200)+40:S2=INT(RHDCS #50 +48 

РОКЕЧО, 15: POKEMO, 129+7 : POKEHF +7, 28: POKEBF+7 ; 199: POKESO+7 , 255 
РОКЕМж(2Ж1),Е2:РОКЕМ%(2Ж12%1,52 š 
AC=PEEKCW+Z1 +211 : POKEW+21 ; AC : A2=1 : RETURN 

REM POSITIOMNEMENT ETOILE 3 
E3=INT(RND¿(428200)+40:S3=IHT(RHDC52850)+40 

РОКЕЧО, 15: POKEMO, 129-14: POKEHF +14, 28: POKEBF+14, 196 : POKESO+14,255 
POKEU+(2#2) ,E3 : POKEW+C2#27+1 ; 53 
AC=PEEK(U+21 2+212 : POKEW+21 , AC: A3=1 : RETURN 

REM EVOLUTION ETOILE 1 

Е1=Е1+1:1РЕ1>25@ТНЕНЕ1=Е1-1 

РОКЕМО, 128 

S1=51+R1:1F51>=2S8THENI1=1:61=220:#=4+1:GOTO 350 

POKEU+ {2402 , E1 :POKEN+ (2%02 +1 , S1 : RETURN 
ВС=РЕЕКСКИ+21›-21@:РОКЕМ+21,НС:581=@:КЕТЦШЕН 

REM EVOLUTION ETOILE 2 

Е2=Е2+1:1РЕ2>25@ТНЕНЕ2=Е2-1 

POKEMO+7 , 128 

S2=S2+R2: IFS22=23OTHEN12=1 : G2=225:=K+1 :GOTO 410 


408 POKEW+C2#1).E2:POKEW+C2#17+1 , S2: RETURN 


410 AC=PEEKCW+21) =2 t1 : РОКЕМ+21 , RC: S220: RETURN 
426 КЕМ EVOLUTION ETOILE 3 


- Faites-la changer de plan à l'aide de la 


430 E3=E3+1:IFE3>250THENE3=E3-1 E 
440 POKEMO+14,128 

450 S3253*R3:IFS322238THENI3-1:63-2215:4-4-1:G0T0 476 

460 POKEMtC2ZW25,E3:POKEWFCZKZ) +1 , S3: RETURN 

478 RC-PEEKCU4215-212: POKEW+Z1 , RC: $320: RETURN 

488 REM RPPRRITION FEU 1 

498 PUKEMW*(C2WS),E1:POKEMF (25) +1 , G1 : POKEW+21, CPEEKCIIA2124215) : H2: RETURM 

Sûd REM APPARITION FEU 2 

510 POKEM+(2#6) , E2 : POKEU+C2K6 2 +1,62: POKEM+21 , CPEEKCHEZ1242 16) : I2=2: RETURN 

520 КЕМ APPARITION FEU 3 

530 POKEU+C2#7),E3 : POKEM+(2#7 2-1, G3: POKEW+21 , (PEEKCH+21)+217) : 13=2:RETURH 

250 азына ыы ыы 

560 КЕМ CORPS ШЕ PROGRAMME 

DCH КЕМ 

SE REIN ADR ННН НОН ННН 

598 U=127:V=30:V1=200:K=24:C=1800 : E=40 :V0=54296:M0=54276:FH=54273:FB=54272 

600 S0=54278 : POKE53280, 9 : POKES3281 , 6 ‘PRINT"?J" : GOSUB 1234 

618 РОКЕИ+Э9, 1 :POKEW+49, 1 :POKEU+41 , 1 : POKEW+42, 0: POKEU+43, 14 :POKEMW+44, 7 

620 PÜKEW+45, 7 :POKEW+46, 7 

E POKEW+Z1 , 24: FOKEU+(2K) , 127 : POKER 662-17 39 :POKEM+C2K4) , 127 : FOKEW+(8)+1 , 38 

650 FÜRL=1T014STEPZ : GOSUB1 O20: U=U+1 : V=V+L : 0080860: NEXTL : 005081090: TD=T Ï 

668 REM----------- COMMRNDES 

670 HE=INT(RNDC 1249) +1:R1=HEX2:R2=HE+9:R3=INT((HE122/5) 

588 GETUS 

690 IFW$z"N" THENUsU-7-C4XX» 

780 IFW$z"M"THENUSUt7*C4XX5 

716 IFW$z"T THENVsV-?7-(4WX4» 

720 IFW$-"N"THENVzVe7- (4x) 

738 IFM$-" "НЫШУ>160ТНЕНО05ЦВ110:Н2-0:0070770 

740 1FV2=17GANDV<=180THENHZ= INT ЕМО 1)#8) : 5070770 

750 ІЕН2>-ФТНЕМРОКЕИФ27, 24 

Cep IFHZ<40RV<180THENPOKEM+27 , Ø 

776 GOSUB60 

780 OHHEGOTO?94, 799, 790, 790, 790, 800, 800, 800 

798 1F11=GANDA1=GTHENGOSUB 1 69 : GOTOB2G 

800 IFI2=GANDAZ=GTHENGOSUB2 10 : GOTO829 

810 IFI3=GANDAS<GTHENGOSUB269 : 0070820 

824 IFRi-1THEMGDSUE 300 

838 IFR2-1THENGÜSUE 369 

848 IFH3-1THENGÜSUE 420 


854 IFI1=1THENA1=0:GOSUB 480 
Sep IFI ТНЕМЯ2=0 : 50508 500 
870 IFI ТНЕМАЗ=0 : GOSUB 520 
880 IFI ТНЕНРОКЕНМ+21›РЕЕКСИ+212-2Т5:5050В48@ 


830 IFI THENPOKEN+21 , PEEKCH*212-2 T6: GOSUBSAG 

988 1Е1З=2ТНЕНРОКЕМ+21,РЕЕКСИ+21›-217:6050В52@ 

918 IFFEEK(M+27)<>GTHENS59 

920 1F11<3GANDU-E 1<2SANDU-E 1 >SANDG1-V<1STHENPOKEN+Z1 , PEEK<H+21)-215: 190: 484-1 
938 IFI2C>BANDU-E2<208ANDU-E278ANDG2-Y<15THENPOKEW+21 , PEEKCH+21 9-216: 1226 424-1 
348 IFI3C70AHNDU-E3<220AMDU-E328ANDG3-V<15THENPOKEW+21 , PEEK CW+213-2417 : lei 2-1 
950 IFHBSCU-E1»CISHMDRBSCV-S1»C18THENIi1-8:H128:G0SUB358 

968 ІЕНВ54!-Е22<15НМИНВ5(У-522<10ТНЕНІ2- 50508410 

Э?й IFHBSCU-ES)CISRHNDRBSC/-532 C1BTHEHIG3sO: :60SUB470 

388 1Ех=ЗТНЕНбОТО171@ 

ЭЭЙ 1Ей=2бО0Т067@ 

1000 GÜTOGSS 

1810 REM DESSIN ЕТО ЕЗЖЕ 


":BDTDiB8B 
DUTO1886 
.":530Т701080 


1870 A$= 
1688 PRINTAS; :NEXTA: RETURN 
1090 БЕМЖЖЖЖПЕ5ЗІН ІШ VILLAGE ############ 


100 PES 


PRINT" : PR IHT" KONINIE TETT" ` 
PRINT" I h; 

PRINT" 1 и; 

PRINT"m ' "à 

PRINT"E = w= "; 

FRINT reg = > w w wm 

PRIHT"M d ma п a CRE 

PRINT а Un 

PRINT" "; :POKE2023, 168: POKES6295, à 
RETURH 

FEEF КЕК 

D БЕМЖЖЖЖЖЖЖ SPRITES — жжжкжжжж 

РЕМЕК ЖЕЖ Ж ЖЕЖ ЖЕ ЖЕЖ ЖЖЖ 

U=53248 : FORA=ÔTOZ :РОКЕ2049+А, 192+A: NEXTR 

ЕОЕН-йТ0508: READF : FOKE 12288+A, F : NEXTA : RETURN 


REM ETOILES 


DATA EE TEE EE EE 
DATA sss SES 

Ø DATA ê4) 1224, 64s ss ss a sn 
DATA ,,,,;,;));,,););))).)...) 


USR EE EECH EERSTEN 

DATA Js 

REM SOUCOUFE NOIR ET COULEUR DEUX 

DATA ,›,4,,,139,128,4,5,240,8,5,240,128;11,255,128,11,255,4,223,224 
DATA aN 

DATA ,,24,,,118,,3,250,,7,250,,127,244,,127,244,,3,32, 

ااا ارا ررر ررر رار ررر رر ررر رد ررر ررر ررر ررد ررد DATA‏ 

REM INCENDIES TROIS 

DATA ,›,,,,,,›,,,,,,,,›,››,›,8›,1,4,128,2,12,8@,4,14@,290,37,12,2@8 
DATA 76,156,112,94,254,58,94,126,28,127,63,190,127,63,191 

DATA 127,159,255,63,255,254,15,255,248,0,126,0 

DATA ‚,,,,,,,,›,›,,›,,,,,›,,,,8,,›1›4,128,2,12,8@,4,14@,2@8@,37,12,2й8 
DATA 76,156,112,94,254,58,94,126,28,127,63,190,127,63,191 

DATA 127,159,255,63,255,254,15,255,248,0,126,й0 

DATA ,,,,,,,,,,,,,,,,,,,,,,,8,,1›4,128,2,12,8@,4,14@,2@0@,37,12,208 
DATA 76.156,112,94,254,58,94,126,28,127,63,190,127,63, 191 

DATA 127,159,255,63,255,254,15,255,248,0,126,0 

REM TABLEAU D'AFFICHAGE 

PRINT"Z" 

POKEZ14,5:PRINT:PRIHTTAB(E) ; "4 Y 
POKE214,6:FRINT:PRINTTABCS) ; a STARFALL M" 

РОКЕ214, 7 ‘PRINT :PRINTTABCE) ; "4 

РОКЕ214, 15: PRIMT:PRINTTRBCO» ; "d KR 
FOKE214,16:PRINT:PRINTTABCS) ; "4 к 
FOKE214,17:PRINT:PRINTTRB(S); "q Қ 
РОКЕ214,18:РЕ1НТ:РЕ1НТТНВС8›;"@ py 
FOKE214,20:PRINT:PRIHTTRBCS2;"R n 
POKEZ14,21:PRINT:PRINTTAB(S); "4 U 

RETURH 

REM AFFICHAGE ENTETE 
GOSUB1478 PRINT" a" 


РОКЕ214,1 RINT:PRIMTTRECS» ESSAYEZ DE SAUVER n 
РОКЕ214,1 КІМТ:РКІМТТЯВ(8) LA VILLE DU FEU ! 
РОКЕ214,1 RIHT:PRIHMTTRECS» 4 
POKE214,20:PRINT:PRINTTABS7) ; "3 AVEC VOTRE SOUCOURE " 
РОКЕ214,21:РБІМТ:РБІМТТЕВ(72;"Я ETEIGMEZ LES INCENDIES " 


FOKE214,22:PRIMNT:PRINTTAB<C7) ; "A DETRUISEZ LES METEORES " 
POKEZ14,12:PRINT:PRINTTAB(7);"4 PRESSEZ Fi POUR SUITE " 
GETSUS ` IFSLI#=" "ТНЕНі 580 

IFSUS<C>CHRSEC133)THEN1689 

РЕЇНТ"Л":РОКЕ53269,@:бОТО 560 

REM AFFICHAGE SCORE FINAL 

TF=TI:FF=INTC(CTF-TD2)260) 

PRINT" 4" : 605081470 

POKEZ214, 16:PRINT:PRINTTAE(S2; "d VOUS AYEZ TENU : " 
РОКЕ214, 17 :РЕІНТ :РКІНТТАЕ‹5); "4 SECONDES MN 
FOKEZ214,17:PRINT:PRINTTAB(195; "3" ;FF. 
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1770 РОКЕ214,18:РЕ1НТ:РЕ1НТТНВС8›;"@ ALLONS, PERSEVEREZ ! " 
1788 POKE214, 19:PRINT:PRINTTAB(S): "4 PRESSEZ F7 POUR FIM " 
1790 POKEZ14,21:PRINT:PRINTTAB(S); "4 QU F1 POUR CONTINUER " 
1888 БЕТ: IFSU$=""THEN180S 

1818 IFSU$=CHR$(136) THEN PRINT"2":END 

1828 IFSU#=CHR#C133 THEN CLR:GOTO18 

1835 60701800 


READY S 
24 SHADOW 
а Vous pilotez ип Shadow 111, 
et vous survolez une cité imaginaire 
dont les tours, hautes et basses, seront pour vous 
aubaine ou malchance. 
BUT DU JEU pourrez également en cas de force ma- les deux touches «CRSR», 
= = à Jeure, passer en altitude supérieure, mais - Pour l'ampleur de vos déplacements, uti- 
Faire le maximum de distance, еп prenant || vous en coûtera un surplus d'énergie et lisez les touches «CRSR» et «Shift». 


Soin d'éviter les hauts immeubles que vous ne pourrez plus ravitailler le Shadow - Les touches «Z» et «X» modifient votre al- 
vous identifiez, du dessus, grâce à leur qu'en frólant les immeubles les plus bas.  titude. 


ombre démesurée. Malheureusement 
vous découvrez vous-méme que les appa- AU CLAVIER 


rences sont parfois trompeuses. Vous  - Pour aller à gauche ou à droite, utilisez 
1 REH "SHADOW" 
2 REM TILT COPYRIGHT 1984 
3 REM 
4 PRINT": POKES3230. B: POKES3281 ; 11 :GOSUEFS 
š PRIHT'CIDSNNSDUSSINSBEBE" 
Б IMPUT" gn QUANTITÉ ШЕ KEROZEHE W (MAXIMUM 2888 La NH"; CR 
7 IFCR22UBBTHEHS 


8 CA=CR:Y=186:C0=36:5U=8:AA=80:DI=8 
| VOUS AVEZ PRRCOURU^;" gë": DU; "MAIETRES" 


i LE RECORD EST"; "Ж "; "DY; DM; "METRES" 


13 РПКЕЕж21,3:РПКЕ54296,4 
14 PFIHT" da PRESSEZ LA BARRE FOUR PARTIR "; a Un Dh Bou Na u Do Uu u Bh "^ 
15 PRIHT" DU "POUR KERÜZEHE" 


16 GETV$: IFViz""THEH1& 


" THEHLIZU 209 
FHE=" и" THEHU=U+5 

IFMWS="8"THEHU=U-5 

ТЕМФ "Э THENU=U-20 44] 
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[TAEC E2 :FPRINTCE 

STHEHSE 
IFA=ZTHENPRINT 
AA=AA+1 : DI=DI+106: IFAA=STHENPRIHT " aa"; DI 
IFG=7THENCO=66 
IFQ-OTHEHCO-30 
CA=CA-CO 
IFAAZ1GTHENPRINT" i"; CA 
ІҒАА=1#ТНЕНАЯ=@ 
IFCAC=GTHENSZ 
IFCRX-BTHEHCR-B 
FüRTTz-2TO8 
UU=U: IFPEEK(E+162=7THEHUU=UU+255 
IFPEEKCÇ1344+TT+INT<UU/8) ) 182 FIHDG- B THEN185 
IFPEEKC1S44*TT* IMTCUUZ82 ? 2 DH DDT HEH Gest. 188 
IF CR2-2888THEHMCR-2006 
HERTTT 
507020 
FORA=ATOT :РОКЕ2040+Я, 192+A : НЕХТА 
FORN=BT062 : READI : POKE12288+H, I :HEXTN 
FORN=BT062 : RERDI ` FOKE12352+H, 1: HEATH 
FORH=B8TÜ62 : RERDI : POKE12416+N, I :HEXTN 
E=53248 : FOKEE+39, 0: POKEE+49, 1 : FOKEE+21 ; 3 
DATA Ø. 56, 0, 0, 76,0, 63, 207, 248, 0,73, 208, 0:79, 144 
DATA 0,78,32,0,94,64,4,94,192,4,95,64,4,94,64 
DATA 0,94,0,0,92,0,0,76,0,0,76,й 
DATA &,8,8,8,8,0,0,24, 0, 0, 56,0, 0, 16, 0, 0, 15, 0, 8. 16, 8 
DATA 8,8,0,8,48,0,0,48,0, 31, 176, 32, 31, 176, 15,177,132, 7, 161, 128 
DATA 3.151.8,1.168,8,8,168,8,0, 166, 6, 0, 22, 0, 0, 48, 0, B, 46, 0, 0, 48, 0 
DATA ,8,48,8,8,32,0,0,0,0, 0,0, 0, 0,0, 0, 0, D, 0 
DATA 128.16.8,64,24,48,56.61,224, 8, 63, 192, 15, 285, 0, 3, 255, 6 


DATA 224,242, 224, 63, 212, 255, 15, 248, 240., 3, 240, 192, 255. 213, 192, 31, 255, 192 


DATA 1:252, 224, 1, 127. 240., 3, 245. 242,7. 254,125 
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DATA 15.254,7,15,126,2,28,399,0,48,65,0,224,65,0 
31 RETURH 

92 V-10B:DF-5:D6-3 

93 IFFEEK(E+16)=7THENDF=-5 

94 U=U-¿DF):V=v+DG 

95 PUüKEE.U:POKEE*1, V :POKEE*2, U 

96 POKEE+3,V:POKEE+4,U:POKEE+5: V 

97 IF(PEEK¿(E+16)=7RHDU>6520RCPEEK(E+162=BRHDU<485THEH185S 
38 GOTO94 

99 5=54272 

188 POKES+24;5U+0 

181 FOKES+6, 125 

102 POKES. 139 :POKES+1, 4 

183 РОКЕ5+4, 129 

144 RETURN 

185 POKEE+4,U:POKEE+S, V: POKES4296, 0 
106 POKEE+41,7 

107 PÜKEE*21,.4:FÜRT-1TO18G6:MEAXTT 

188 РОКЕЕ+41,1 

109 POKEE+41, 7 :FORT=1T0199 :MEXTT 

118 РОКЕЕж23,4:ҒОКТ-170100: NEXT 

111 FOKEE+23,5:DU=DI 

112 РОКЕЕж21,0:ҒОКТ-170500: NEST : GOTOS 


Êtes-vous gourmet ou gourmand ? 
Difficile de trouver sa nourriture dans cet espace hostile 
ou règne en maître votre ennemi numéro 1. 
Il vous faudra pourtant, sous peine de mort, 
la découvrir et surtout, la posséder. 


tritifs en évitant de rencontrer l'étre in- 
BUT DU JEU fàme qui hante les lieux. Soyez attentif AU CLAVIER 
- Passer sur le maximum d'éléments nu- et... rapide. - Faites RUN et suivez les instructions. 


REM ЖЖЖЖ SAUVE QUI PEUT ЖЖЖЖ 

REM - 

REM - 

REM 

REM - £ 

GOSUB 5300:REM INIT. SOUS-FROG MACHINE DES TOUCHES 
GOSUB 10000:КЕМ REGLES DU JEU 

RC=0:REM INIT. RECORD 


COSUB 1100:REM INIT. VARIABLES DE JEU 
GOSUB 1000:REM INIT. D'UNE MANCHE 
FJ=0:REM INIT. PTEUR FIN DE JEU 
COSUB 6000:REM GESTION DU BONHOMME 
IF RND(1)(0.25 THEN GOSUB 6000 

GOSUB 7000:REM GESTION DU PROF. 


КЕМ EFFETS DE POURSUITE 

IF RND(1)(1/VI THEN GOSUB 7000 

IF FJ=0 THEN 100:REM SI LA MANCHE CONTINUE... 

IF FJ=2 THEN 300:REM SI PERDU... 

REM ON À GAGNE UNE MANCHE: 

REM RAJOUTE DES OBJETS ET AUGMENTE LA VITESSE DU PROF 
NO=N0+5:VI=VI-5 

IF VI(5 THEN VI-S:REM VITESSE LIMITE 

GOTO 60:REM REJOUE UNE MANCHE 

КЕМ --- ON А PERDU 

PRINT TAB(7):'POUR REJOUER, APPUYER SUR ‘RETURN’ ..." 
IF СЕТС()13 THEN 320:REM ATTEND UN "RETURN" 

GOTO 50:КЕМ RECOMMENCE UNE PARTIE 

REM ---- INITIALISATION ----- 

GOSUB 2000:КЕМ INIT. MODE GRAPHIQUE 

GOSUB 1200:REM PLACE BONHOMME 

GOSUB 1300:REM PLACE LE PROF 

GOSUB 8900:REM PLACE LES OBJETS 

RETOREUSUB 9000:REM AFFICHE LES SCORES 


REM ---- INIT. VARIABLES DE JEU ---- 


VUI=S50:VI=VVI:REM INIT. VITESSE DU PROF 
VNO=5:NO=UVNO:DB=NO:REM NBRE D'OBJETS 
RETURN 

REM ---- PLACE BONHOMME ---- 
BX=INT(RND(1)KXM):BY=INT(RND(1)KXYM) 

DOT ВХ,ВҮ C1:REM AFF. BONH. 

RETURN 

REM ---- PLACE PROF E 
PXPSINT(RNDCI)XXHO sPYPSINT(RNDCIOXYM) 

IF SCRN(PXP;PYP)-CZ THEN 1300:REM SI DEJA QUELQUE CHOSE 
DOT РХР,РҮР С2:КЕМ AFF. LE PROF 

RETURN 

REM ---- INIT. MODE GRAPHIQUE ---- 

MODE ZA:XM=XMAX:YM=YMAX-19 
CO=0:C1=14:C2=3:C3=12:COLORG CO Сі C2 C3 


RETURN 
REM ---- ENTREE DES COMMANDES ---- 
PX=0:FY=0 


CL=H4001:CALLM H5000,CL:IF CL()0 THEN PY=1:REM SI DIR HAUT 
CL-84002:CALLM 85000,С F CLO THEN PY=(-1):REM SI DIR BAS 
CLz84004:CALLM H5000,CL:IF CL()0 THEN FX=(-1):REM SI DIR GAUCHE 
CL=H4008:CALLM H5000,CL:IF CL()0 THEN PX=1:REM SSI DIR DROITE 
RETURN 

REM INIT. PROGRAMME MACHINE DES TOUCHE 

ADR-85000:FOR I-0 TO 28 

READ А:РОКЕ ADR+I,A 

NEXT I:RETURN 

КЕМ ---- SOUS-PROGRAMME MACHINE POUR LES TOUCHES ---- 

DATA ЙҒ5,НЕ5,Н05,8С5,811,5,0,819,87Е,ЯҒ3,822,7,ШҒҒ,ЯЗА 

DATA 1;HFFrHFB;H2B; HA6; 823. 877 HZBo H36. 0 

DATA HCi,HD1,HE1,HF1,HC9 

КЕМ ---- DEPLACEMENT DU BONHOMME ---- 

COSUB 5000:КЕМ VOIR SI COMMANDE 

IF FX=0 AND FY=0 THEN RETURN:REM SI RIEN 

IF (BX*PX(0 OR ВХ+РХУХМ) OR (BY+PY(@ OR BY+PY)>YM) THEN RETURN 
DX=BX+FX:DY=BY+PY:REM COORD. DE DEPLACEMENT 

REM TOUCHE-T-ON UN QUELQUE CHOSE 7 

Z=SCRN(DX,DY):GOSUB 6500:REM AFF. BONH. 

IF Z=C0 THEN RETURN:REM SI TOUCHE RIEN 

IF Z=C2 THEN FJ=2:GOSUB 6600:RETURN:REM SI TOUCHE PROF 

REM ON TOUCHE UN OBJET: 

ÜB-Ü0B-1:IF 0В-д THEN SC-SC*100:G0SUB 9000:FJ=1:RETURN 
SC=SC+10:GOSUB 9000 

RETURN 

REM ---- AFFICHE BONHOMME ---- 

DOT EX,BY CO:REM EFFACE BONH. 
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106 


6519 
8520 
6530 
6599 
6600 
6610 
6620 
6630 
6999 
7000 
7010 
7015 
7020 
7030 
7040 
7050 
7055 
7060 
7100 
7110 
7999 
8099 
8010 
8029 
8030 
8040 
8050 
8999 
9000 
9010 
9020 
9999 
10000 
19010 
19920 
19039 
10110 
10120 
10149 
19159 
10160 
10170 
10180 
10190 
19219 
10220 
10230 
10240 
10250 
19260 
10270 
10280 
10300 
10310 
10320 
10330 
10340 
10400 


EX=DX:BY=DY:REM NOUVELLES COORD. 
DOT BX.BY Ci:REM AFF. BONH. 
RETURN Я 

REM ---- AFFICHE LE PROF ---- 
DOT РХР,РҮР CO 
РХР=РХР+РХХ:РҮР=РҮР+РҮҮ 

DOT РХР,РҮР С2 

RETURN 


IF PXP=BX AND РҮР=ВҮ THEN FJ=2:GOSUB 6600:RETURN 
КЕМ SE RAPPROCHE DU BONH. 

IF PXP (BX THEN PXX=1 

IF PXP)BX THEN РХХ=-1 

IF РҮР«ВҮ THEN PYY=1 

IF PYP>BY THEN PYY=-1 

КЕМ TOUCHE-T-ON QUELQUE CHOSE? 

IF SCRN(PXP+PXX/PYP+PYY)=C3 THEN RETURN 
GOSUB 6600:REM AFF. LE PROF 

RETURN 

REM ---- PLACE LES OBJETS ---- 
OB=NO:FOR 1=1 TO NO 
X=INT(RND(1)XXM):Y=INTCRNDC1)XYM) 

IF SCRN(X,Y)()CO THEN 8010 


DOT X,Y СЗ 

NEXT 

RETURN 

REM ---- AFFICHE SCORE/RECORD ----- 


IF SCDRC THEN RC=SC 


PRINT CHR$(12)TAB(10);"SCORE=";SC;" ' STABCIO) 5 "RECORD: "КС?" 
RETURN 


КЕН ---- REGLE DU JEU ---- 
PRINT CHR$(12):REM EFFACE ECRAN 
PRINT 


PRINT ТАВ(30); 
PRINT ТАВ(30); 
PRINT ' VOUS SOUVENEZ-VOUS DE VOTRE TENDRE ENFANCE ?* 


PRINT ' MAIS SI, DANS LA COURS DE RECREATION ?* 
PRINT ' NON ?' 
D 


PRINT CELA NE FAIT RIEN, VOUS ALLEZ POUVOIR COMBLER" 
PRINT CETTE LACUNE..." 

PRINT 

PRINT DANS LA COURS DE RECRE (ATION), VOS BONBONS SONT" 
PRINT TOMBES PAR TERRE (ILS SONT BLEUS 1)." 

PRINT HELAS, LA SONNERIE А RETENTI..." 


` 
D 
PRINT ' ESSAYEZ DE KAMASSER TOUS VOS BONBONS (EN PASSANT" 
PRINT ' DESSUS) AVANT QUE LE PROF VOUS ATTRAPE ET VOUS TIRE* 
D 


PRINT LES OREILLES (AIE!)' 

PRINT 

FRINT ' ATTENTION А SA RUSE: PARFOIS IL SE POSTE PRES" 

PRINT ' D'UN EONMECN ET IL FAIT CELUI QUI EST TOUT GENTIL" 
D 


PRINT ' L'HYFOCFIT 
FRINT 

PRINT ‘VOILA, EON COURAGE" 

PRINT "МЕ: VOUS VOUS DEPLACEZ AVEC LES CURSEURS" 

PRINT :PRINT 'APPUTER SUR ‘RETURN’ POUR COMMENCER. .."? 
IF GETCO 13 THEN 19246:FEM ATTEND RETURN 

RETURN 


SAUT EN LONGUEUR 


Les Jeux Européens vont débuter 
et vous y participez. 
Discipline : Le saut en longueur. 
Un peu d'échauffement, un départ lent, une accélération brutale, 
un appel sans faille et vous voilà 
propulsé vers la gloire ои... 
dans les affres de la honte. 


% 


BUT DU JEU de parler, il faut courir à point. À vous... = Sautar avant la flèche en appuyant sur 
«Espace», 
Dès le début de la piste, faites une course AU CLAVIER Cora touche peut modifier l'angle de 
bien calculée et calibrez essentiellement - Faites RUN votre saut si vous appuyez trop longtemps 
l'instant exact où vous devrez presser la  - Vous êtes représenté par une étoile. dessus ou pas du tout. 
touche de saut. Le moindre détail sera - Pour courir ` appuyez fréquemment sur 
lourd de conséquences. Mais rien ne sert la touche «Shift», سس‎ 


GOSUB 8000:КЕМ Initialise l'ecran et le programme 
INPUT "Non du ler joueur ";NM1$:PRINT 

140 INFUT "Mon du Zeme joueur *;ММ2$:РОКЕ H75,32 
150 GOSUB 1000:G$-2NM1$:LG!-LG1!:PRINT CHR$(12) 
160 IF 16212161! THEN G$-NM2$:LG!-LGZ2! 

179 IF LG2!-LG1! THEN PRINT "'Esalite..'::G0TO 190 
180 PRINT "Le vainaueur en saut : "$G$ 

190 PRINT "Votre performance est de ';LG!;* metres." 
200 POKE #75,95 

$00 END 

93? REM ЖЖЖЖ ESSAIS DES SAUTS DES JOUEURS Жжжж 
1000 LG1!-0:LG2!-0:F0R I=1 TO 3:PRINT CHR$(12) 
1010 CURSOR 0,22:FRINT "Joueur : ':NM1$:PRINT "Essai по. "І 

1020 PRINT ‘Performance :'sLG1! 

1030 GOSUR 2500:GOSUB 2000:IF LGIOLGi! THEN LG1!-LG! 

1040 GOSUB 1500:REM attente clavier 

1050 PRINT CHR$(12):CURSOR 9,22:РКІМТ "Joueur £ -"#NM24 

1060 PRINT "Essai no.';I:PRINT ‘Performance :':LGZ2! 

1070 GOSUB 2500:G0SUB 2000:ІҒ 16121621 THEN (621-161 

1080 GOSUB 1500:КЕМ attente clavier 

1090 NEXT 

1100 RETURN 

1499 КЕМ ЖЖЖЖ ATTENTE AU CLAVIER Жжжж 

1500 CURSOR 5,1:РКІМТ 'árruver sur la touche C .." 

1510 CL-H8408:CALLM 85000,CL:IF CL-0 THEN 1510 

1520 RETURN 

1999 КЕМ ЖЖЖЖ UN ESSAI DU SAUT EN LONGUEUR Жжжж 

2000 YB-7:XB-59:CURSOR XB.YB:PRINT "X';::FLIP-O:LT!-1:LG!-0 

2010 CL-84080:CALLM H5000,CL:IF CL-0 THEN 2010 

2020 CL=H2020:CALLM H5000,CL:IF CL()0 THEN 2200 

2030 CL=H4080:CALLM й5000,С1:ІҒ FLIP-O AND LTI)1 AND CL()@ THEN LT!=LT!-2:FLIP= 


2040 LTI=LTI+0.25:IF CL-0 THEN FLIF=@ 

2050 LTCD=LTCD-1:1F LTCD)0 THEN 2020 

2060 LTCD=LTI:XB=XB-1:CURSOR XB;YB:PRINT "x "; 
2065 IF XB(S THEN 2280. 

2070 FLIF=1:G0T0 2020 


2200 ANGLE=90 5 
2210 CURSOR 15,18:ANGLE=ANGLE-3:PRINT ANGLE;:CL=#2020:CALLM H5000,CL:IF CL()0 А 
ND ANGLE)4 THEN 2210 


2220 TI=0:DTI=8E-2:V0l=5+5XEXF(-ABS(LTI)/10):IF У01910 THEN У0!-10 
2259 А NGLEXF1I/180:VX!=VO1XCOS(A!):VY!=VO!XSINC(A!):DX11=0:DY1=0 
2240 TIsTI4DTI DX! sUXI XTI :DYSZX(-SKTUXTI &UY!XTIO:IF DYCO DR XB-DX!x2(0 THEN 227 


50 CURSOR XB-DX1!X2,YB+DY1:PRINT ° '::CURSÜR XB-DX!X2.YB+DY:PFRINT * 
[:DYI=DY:GOTO 2240 

70 LG!=INT(DX1!X100)/100:LG!=LG!-((XB-22)/2) 

2280 CURSOR 15,19:1F ХВ‹22 THEN PRINT 'MOÜRDU..':LGIO:RETURN 
2290 IF 16159 THEN PRINT 'FAUTE..":LG!=0:RETURN 

2300 PRINT LG!;" metres..' : RETURN 

2499 КЕМ ЖЖЖЖ AFFICHE LE SOL ЖЖЖЖ 

2500 FOR 1=#В&82 TO HB706 STEP 2:РОКЕ I,255:NEXT 

2510 CURSOR 3,6:FOR I=9 TO 2 STEP -1:PRINT 1;:НЕХТ 

2520 CURSOR 22;6:PRINT CHR$(94);:RETURN 

7999 КЕМ ЖЖЖЖ INITIALISATION ECRAN ЖЖЖЖ 

8000 COLORT ð 12 5 14:FOR I-85000 TÜ H501C:READ А 

8010 POKE І,А: МЕХТ:РКІМТ CHR$(12) 

8050 RETURN 

8100 DATA WF5,HES;HDS;HC5,H11;3,0;H19, H7E; HF 3; 32,7, НЕЕ 
8110 DATA H3A:1;HFF,HFB,H2B,HA6,H23,H77,; 2B, H36, 0, DEL e HDI 


M DATA BEL, BEL, DCS в 
S INTERGALACTIQUE 


Décidément, l’espace n'est pas calme. 
Surtout lorsque les météores convergent vers vous 
et que vous ne disposez que d'un classique rayon laser pour vous défendre. 
Faites preuve de sagacité, de vivacité 
et n'oubliez pas d'emporter quelques litres de sang-froid. 
Vous éviterez ainsi une fin affreuse. 


:DX1!=D 


BUT DU JEU mais puissant faisceau laser. - Le déplacement se fait à l'aide de la poi- 
пёе 
Détruire vos assaillants minéraux qui fu- | AU CLAVIER I EEA n ене 


sent de toutes parts en utilisant un simple - Branche: le paddle. 
100 REM әне жж INTER-GALACTIQUE es POUR DAI ###### 
1000 CLEAR 10000:MODE 4A:C1%=9:C2%=3:C3%=4:C4%=15:F1%=FREG(33.0):F2%=FRE0(330.0):F3%=FREG(1000.0):F4%=FRE 


Boe, gy 

1010 POKE 475,32 

1020 COLORT 9 15 0 €:COLORG C1% C2% C3% C4%:DIM X%(108.0),Y%(100.0) 

1030 A%=40:XX%=XMAX:YX%=YMAX:YY%=YX%#0,8:XY%=XX%-YY% 

1045 PRINT CHR$(12):INPUT " Combien de lasers : 10 , 15 ou 20 ";B%:BB%=B%:1F B%=15 OR B%=20 OR B%=10 GOTO 1 
050 

1046 GOTO 1045 

1050 B%=BB%:PRINT CHR$(12):CURSOR 20,2:PRINT "VOYAGE INTER GALACTIQUE" 
1055 C%=0:COLORG C1% C2% C3% C4%:FILL 0,0 XX%,YX% C1% 

1069 FOR D%=1 TD 5:E%=20+RND(XX%-30.0):F%=30+RND(Y Y %-25.0) 

1070 FILL Е%,Р% E%+RND(10.0),F%+RND(5.0) 22:NEXT 

1080 FOR М%-1 TO A% 

1990 X%(M%)=RND(XX%):Y %(M%)=RND(Y Y%) 

1100 ІР SCRN(X%(M%),Y%(M%))=C3% GOTO 1090 

1110 DOT X%(MX),Y%(MX) 21:NEXT 
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1120 X%=RND(XX%):Y%=RND(YY%) 
1130 IF SCRNIX%,Y%)=C2% OR SCRN(XX,YX)=C3% GOTO 1120 
1149 DOT X%,Y% 23 


1150 PRINT CHR$(12):CURSOR 5,1:PRINT " ";А%;" meteorites ":CURSOR 40,1:PRINT " ";B%;" lasers" 
1160 FOR 0%=5 TO 1 STEP -1 

1170 CURSOR 15,3:PRINT "Depart dans ";G*;" secondes ":SDUND 0 0 15 0 F1*:COLORG C1% C1% C3% C4% 
1172 WAIT TIME 2:80UND 0 0 15 2 F2%:WAIT TIME 30:COLORG C1% C2% C3X C1%:NEXT 

1175 SOUND DFF 

1180 COLORG C1% C2% C3% CAX:CURSOR 15,3:PRINT " PARTEZ !! * 

1190 CURSOR 18,3:PRINT" ";С%;" meteorites detruits " 

1200 ІР PEEK(#FD00) IAND #20<>0 THEN GOSUB 3215 

1280 IF C%<A% GOTO 1300 

1299 PRINT CHR$#(12):CURSOR 30,2:PRINT "GAGNE !!":WAIT TIME 100:А%=А%+1:60Т0 1050 

1300 PO%=PDL(0)/86+1:P1%=PDL(1)/86+1:U%=X%:V%=Y% 

1310 ON Р0% GOSUB 2400,2440,2480 

1320 IF Ү%<0 THEN Ү%-0:0070 1340 

1330 ІР Y%>YY% THEN Y%=YY% 

1340 IF Х%<0 THEN X%=0:GOT0 1360 

1350 ІР Х%2ХХ% THEN X%=XX% 

1360 IP 5СЕМ(Х%,Ү%-С2% OR БАТ исак THEN DOT X%,Y% C4%:PRINT CHR$(12):CURSOR 20,2:PRINT "SCRATC 
H !":WAIT TIME 100:А%-А%-1:00Т0 1050 

1370 SOUND 1 1 15 0 F3%:DOT X%:Y% ER IF U%=X% AND У%-Ү% THEN SOUND OFF i 1380 

1375 DOT U*,VX 20:50UND OFF 

1380 IF С%-А% GOTO 1290:FOR 1%=1 TO A%:1F PEEK(#FD00) LAND 820450 THEN goss 3215 

1385 ІР Ү%(1%-ҮХ% THEN NEXT:GOTO 1190 

1390 DOT X'&IX),Y %(1%) 20:X%(1%)=X%(1%)+SGN(X %-X% (1%)): Y % (1%)=Y % (1%)+SGN(Y %-Y % (1%)) 

1400 IF SCRN(X%(1%),Y %(1%))=C1% THEN DOT X%(1%),Y%(1%) C2%:NEXT:GOTO 1190 

1410 IP SCRN(X%(1%);Y%(1%))=C4% THEN DOT X%,Y% C2%:CURSOR 30,2:PRINT "PERDU !!":WAIT TIME 200:A%=A%-1:G 


1420 b XO, Y SIX) C1%:Y%(1%)=Y X%:C%=C%+1:NEXT:GOTO 1190 
2400 ON Р1% GOTO 2410,2420,2430 

2410 X%=X%-1:Y%=Y%-1:RETURN 

2420 X%=X%-1:RETURN 

2430 X%=X%-1:Y%=Y%+1: RETURN 

2440 ON P1% GOTO 2450,2460,2470 

2450 Y%=Y%-1:RETURN 

2460. RETURN 

2470 YX=Y%+1:RETURN 

2480 ON P1* GOTO 2490,2500,2510 

2490 Y%=Y%-1:X%=X%+1:RETURN 

2500 X%=X%+1:RETURN 

2510 Y%=Y%+1:X%=X%+1:RETURN 

3215 ІР B%=0 THEN RETURN 

3216 GOSUB 4400 

3240 POR L%=1 TO A% 

3250 ІР SCRN(X%(L%)Y%(L%)=C4% THEN Y %(L%)=YX%:C%=C#+1:SOUND 1 1 15 2 F4%:CURSOR 18,3:PRINT " ";C%;" ":SD 


UND OFF 
3260 NEXT L% 


3265 SOUND OFF 
3270 DRAW R%,S% X%,Y% 20:DOT X%,Y% 23:RETURN 

4230 IF P0%>170.0 AND Х%%Ү%<-ХХ% THEN R=X%+Y%:5%=0:RETURN 

4240 IF РӨ%2170 AND Х%%Ү%2ХХ% THEN R%=XX%:5%=X%+Y%-XX%:RETURN 
4250 ІР Р0%<85 AND X%>=Y% THEN R%=X%-Y%:5%=0:RETURN 

4260 IF P0%<85 AND Y%>X% THEN R%=0:5%=Y%-X%:RETURN 

4270 R%=X%:5%=0:RETURN 
4300 IF P0%>127 THEN R%=XX%:5%=V %:RETURN 

4310 R%=0:S%=Y%:RETURN 

4350 IF Р0%2170 AND X%<=XY%+Y% THEN R%=X%+YY%-Y %:5%=Y Y %: RETURN 
4360 IF P0%>170 AND X%>XY%+Y% THEN R%=XX%:5%=Y%+XX%-X% RETURN 
4370 IF PO%<85 AND X%+Y%>=YY% THEN R%=X%+Y%-Y Y %:5%=Y Y %:RETURN 
4380 IF PO%<85 AND X%+Y %<YY% THEN R%=0:5%=X%+Y %: RETURN 

4390 R%=X%:5%=YY%:RETURN 

4400 P0%=PDL(0):P1%=PDL(1)/86+1:B%=B%-1:CURSOR 42,1:PRINT B%;" " 

4405 FOR TY%=1 TO 2 

4410 SOUND 0 0 15 0 F3%:WAIT TIME 2 

4420 SOUND 0 0 15 2 FI:WAIT TIME 2*TY%:1F TY%=8 GOTO 4450 


4430 NEXT 
4440 ON Р1% GOSUB 4230,4300,4350 


4445 DRAW X%,Y% R%,S% 23:TY%=8:GOTO 4410 
4450 RETURN Bj» 
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LE PIGEON AGILE 


Vous n'êtes pas un oiseau de malheur et pourtant... 
Епіге les plombs et vos petits qui crient famine, 
vous ne saurez plus où donner 
de la tête et du bec. 


BUT DU JEU enfants qui vous attendent au nid. = Four déposer les graines, appuyez sur 
«Espace». 


Se tenir le plus éloigné possible du canon Ë AU CLAVIER ] 
fatal en tentant toutefois de récupérer les - Faites RUN pour démarrer le jeu 
aliments nécessaires à la becquée de vos -Vous vous déplacez à l'aide des curseurs 


XREW4:LOOK 


КЕМ kk% CHASSE AU PIGEON kkk£ 
КЕН - 

REM - 

КЕН 

КЕМ - 

REM 

GOSUB 8000:G0SUB 1000:GOSUB 2000:GOSUE 3000:G0SUB 4000 

REM initialisations du jeu 

CHANCE=16:REM parametre de difficulte 

GÜSUB 2100:COSUB 1100 

КЕМ deplacement du chasseur et de l'oiseau 

IF INT(RND(CHANCE))=0 THEN GOSUB 1100 

IF PIGE)@ THEN 130 

REM si il y a encore des oiseaux vivants 

MODE ФІРКІМТ CHR$(12):POKE H75,95 

IF PT=0 THEN PRINT "Vous n'aimez les oiseaux aue dans votre assiette !!.." 


200 

IF PT(10 THEN PRINT "Vous avez vu “les oiseaux’ d'Hitchcok; са se voit..." 
200 

PRINT "BRAVO, voila un defenseur des passereaux !!.." 


POKE H75,95:END 

REM ЖЖЖ INITIALISATION DU CHASSEUR XXX 
TIRX=20:TIRY=2:XB=20:YB=1:DXB=0:RETURN 

REM ЖЖЖ GESTION DU CHASSSEUR ET DE SON TIR ЖЖЖ 

IF DXB-0 THEN IF RND(1))0.5 THEN DXB-(XO-XB) 
CODE=0:X=XB:Y=YB:GOSUB 5000:XB-XB*SGN(DXB) : DXB2DXB-8GNCDXB) 
IF XB=X0 AND Y 0 THEN FIN-1 

CODE=3:X=XB:Y=YH:GOSUB 5000 

IF INT(RND(10))-0 THEN 1150 

IF TIRY(20 THEN 1150 

CODE=Q =TIRY:GOSUB 5000:TIRX-XB:TIRY-YB*1 

CODE=2 =TIRY:GOSUB 5000 

GOSUB 1300:CO0DE=0:X=TIRX:Y=TIRY:GOSUB 5000 

IF TIRY)20 OR TIRY>YO+1 THEN TIRY=20:RETURN 

TIRY=TIRY+1:IF INT(RND(CHANCE/4))=0 THEN TIRX=TIRX+SGN(XO-TIRX) 
CODE=2:X=TIRX:Y=TIRY:GOSUB 5000 

RETURN 

REM Regarde si l'oiseau est touche 

IF ТІКХ-Х0 AND TIRY=YO THEN FIN=1 


RETURN 
КЕМ www INITIALISATION DE L'OISEAU www 
XÜ=6:Y0=20:FIN=0 
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2010 RETURN 
2099 КЕМ www GESTION DE L'OISEAU www 

2190 GOSUB 13900:C0DE-0:X-X0:Y-YO:GOSUB 5000 

2110 CL-84001:CALLM HS502D;CL:IF CL()@ AND Ү‹2@ THEN YO=YO+i 
2120 CL=#400 ALLM 8502D.CL:IF CL<)0 AND Y)1 THEN YO=YO-1 
2130 CL=#400 ALLM H502D,CL:IF CL()@ AND X(43 THEN X0=X0+1 
2140 CL=H400B:CALLM H502D,CL:1F С1‹›@ AND Х) 6 THEN Х0-Х0-і 


EE FIN=1 OR (Х0-ТІКХ AND YO=TIRY) OR (Х0-ХВ AND YO-YB) THEN GOSUB 4200:G0S 
у 


2160 CODE=4:X=X0:Y=Y0:GOSUB 5000 

2170 A-PEEK(ECRAN*XOX2*1):1F A=8 AND GRAIN-O AND YO-1 THEN GRAIN=1:CODE=1:X=X0: 
Y=Y0-1:GOSUB 5000:GRD-GRD-1 a x 

2180  CL-H2020:CALLM H502D,CL:1F Х0=6 AND Ү0=20 AND CL()0 AND GRAIN=1 THEN GOSUB 


2190 RETURN 

2999 КЕМ +++ MISE EN PLACE DU DECOR +++ 

3000 PRINT CHR$(12):COLORT 0 4 0 06:POKE #75,32 

3010 FILL 296,0 309,177 14 

5020 PAS=20:X=0:FOR I=0 TO 40:DRAW 300-X,177+1 ХМАХ,177+1 5 
[3030  PAS-PAS-1:X-X*PAS:NEXT 

3040 FILL 297,160 302,168 9 

3080 Ү=0:ҒОК X=0 TO S:CODE=1:GOSUB 5000:NEXT:GRD=0 

3090 FOR X=6 TO 43:CODE=1:IF INT(RND(4))=0 THEN CODE=5:GRD=GRD+1 
3100  GOSUB 5000:NEXT 

3110 RETURN 

3999 КЕМ ... INITIALISATION DU SCORE ET DES OISEAUX ... 

4000 PIGE-S:PT-0:CURSOR 0,2:PRINT “Score : "РТ 

4010 CURSOR 0;1:PRINT "Nombre d'oiseaux : ';PIGE 

4020 RETURN 

4099 REM ... MISE А JOUR DES POINTS ... 

4100 GRAIN=0:PT=PT+1:CURSOR 8;2:PRINT РТ; 

IF GRD(1 THEN FIGE=PIGE+1:GOSUB 3080:G0SUB 4010:ІҒ CHANCE)4 THEN CHANCE=CH 


4120 RETURN 

4199 КЕН ... MISE А JOUR DES PIGEONS ... 

4200 FIGE=PIGE-1:CURSOR 20,1:РКІМТ FIGE:GRAIN=0 

4210 IF GRD(1 THEN GOSUB 3080 

4220 RETURN 

4999 REM -- AFFICHAGE EN MODE GRAPHIQUE -- 

5000 AFF=(CODEX16+TABLE)X65536+ECRAN+YX720+Xx2+1 

5010 САЕМ H5000,AFF:RETURN 

7999 КЕМ --- INITIALISATION DES PROGRAMMES ASSEMBLEUR --- 
8000 MODE 6A:COLORG 9 11 5 14:ECRAN-PEEK(H88)*PEEK(889)X256 
8010 TABLE-HS100:FO0R I-H5000 TO H5049:READ А:РОКЕ I,A:NEXT 


8020 FOR I-TABLE ТО TABLE*i16Xó-1:READ A:POKE I;A:NEXT 
8030 RETURN 


8099 REM --- AFFICHAGE EN LANGAGE MACHINE --- 

8100 DATA ES, RES, HDS, BCS, 811,30; 819 HESE HEED, #56, HZB, AE 
8110 DATA H2B,H46,H26,B; H2E; 2: HES; ADS HA, H12; 2 TED Gd 

8120 DATA HC2,;H15,850,8D1;H21,H55,0, H19 HEB; HE1, 25 HC EE 
8139 DATA H50,HC1,HDi,HE1,HF1,HC9 

8149 КЕМ --- TESTE DES TOUCHES ENFONCES --- 

8150 DATA #Е5,НЕ5,Й#05,#С5,#11,3,@,#19,Н7Е,ЙЕЗ,Н#32,7,НЕЕ,НЗА 
8160 DATA 1,HFF,HFB,H2B,HA6,H23,H77,H2B,H36,0 

8170 DATA HC1,HD1,HE1,HF1,HC9 

8197 БЕН TABLES DES CARACTERES 


8199 REM Caractere d'effacase 

8200 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 

8209 REM Caractere du carre plein 

8210 DATA 0,255,0,255,0,255,0,255,0,255,0,255,0,255,0,255 
8219 REM Dessin du tir du bonhomme 

8220 DATA 16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16 
8229 КЕМ Dessin du bonhomme 

8239 DATA 0,108,0,40,0,56,.198,56,18,2,58,2,18,42,58,2 
8239 КЕМ Dessin de l'oiseau 

8240 DATA 9,0,0,0,16,16,40,56,88,238,88,0,0,0,0,0 

8249 КЕМ Dessin du ver (pour l'oiseau) 

8250 DATA 8,255,4,255,24,255,52,255,0,255,0,255,0,255,0,255 
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ісі, le terrain ве гарргосһе 
davantage du plateau de Ніррег que du сһатр de bataille. 
Vous larguez des bombes 
mais ces derniëres, pour une fois, 
vous rapportent des points. 


trouvant derrière ces rangées; et obtenir - Larguez votre bombe en appuyant sur 
BUT DUJEU ainsi le record du monde. «Espace». 
Détruire les rangées de points еп lâchant AU CLAVIER 


un projectile afin d'atteindre les bonus se - Faites RUN 


GOSUB 3000:REM INIT ECRAN 
11% GOSUR 10000:КЕМ INIT VARIABLES DU JEU 

129 SC=0:REM ІМІТ. SCORE š 

200 GOSUB 11000:REM INIT. VARIABLES D'UNE MANCHE 

210 GOSUB 6000: КЕМ PLACE RANGEE DES POINTS 

220 GÜSUB 7000:КЕМ PLACE LES BONUS 

230 TP=TP1:GOSUB 9500:КЕМ INIT. TEMPS 

500 GOSUB 9000:REM AFF SCORE 

510 GOSUB 4000:REM GERE LE TRANSPORTEUR 

600 GOSUB 5000:REM GERE LE PAQUET 

700 IF FJ=0 THEN 500 

710 IF FJ=2 THEN 800 

720 ТРі-ТР1-209:ІҒ TF1(500 THEN TF1=500 

739 NBONUS1=NBONUS1-1:1F NBONUS1=@ THEN NBONUS1=1 

740 PRINT CHR$(12):GO0TO 200 

800 PRINT "PERDU..." 

810 PRINT "POUR REJOUER, APPUYER SUR RETURN’... 

820 IF GETC()13 THEN 820 

830 GOTO 100 

996 REM ---AFFICHE UN CARACTERE SUR ECRAN--- 

997 REN. = VARIABLE *CAR' DANS VALEUR DU CARACTERE А AFFICHER 
998 REM - VARIABLE FD=1 : CARACTERE AFFICHE EN INUERSE 
229 REM - VARIABLES X ET Y : COORDONNEES DU CARACTERE 
1000 IF (X(@ OR X)XM) OR (Y(@ OR YOYM) THEN PRINT 'R':RETURN:REM 51 HORS ECRAN 
1019 ECRAN=HBFE7-XX2-YX134:REM CALCUL COORD. DANS ECRAN 
1020 POKE ECRAN,CAR:REM AFFICHE CARACTERE 

1030 IF FD=1 THEN FD-0:PÜKE ECRAN-3,255:REM SI INVERSE 

1040 IF CAR=VIDE THEN РОКЕ ECRAN-3,0:REM SI CARACTERE VIDE, EFFACER L'INVERSE 
1050 RETURN 

1997 REM --- DONNE LA VALEUR DE L'ECRAN DE CORRD. X ET Y--- 
1998 REM - X ET Y: COORD. 00 PRENDRE VALEUR ECRAN 

1999. RER = RESULTAT ECRAN DANS "VXY" 

2000 VXY=FEEK(HBFE7-XK2-YX134):RETURN 

2999 КЕМ ---- INITIALISE MODE ECRAN ---- 

3000 COLORT @ 12 12 @:ñODE © 

3010 PRINT CHR$(12):REM EFFACE ECRAN 

3020 XM=60-1:YM=24-1:REM VALEURS MAXIMALES DE L'ECRAN 

3030 RETURN 

3999 КЕМ ---- DEFLACEMENT DU TRANSFORTEUR ----- 

4000 TX-TX*1:IF TX)XM THEN TX=0 

4010 GOSUB 4100:REM AFFICHE TRANSFORTEUR 

4020 RETURN 
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4099 КЕМ --- AFFICHAGE DU TRANSPORTEUR --- zen 

4100 X=TX1:Y=TY1:CAR=VIDE:GOSUB 1000:REM EFFACE ANCIEN TRANSPORTEUR 

4110 IF PÜ=0 THEN GOSUB 5500:КЕМ SI AFFICHER PAQUET SOUS TRANSPORTEUR 

4120 TX1=TX:TY1=TY:REM NOUVELLES COORD. 

4130 X=TX1:Y=TY1:CAR=TSP:GOSUB 1000 

4999 GESTION DU PAQUET --- 

5000 THEN GOSUB 5200:КЕМ VOIR SI INIT 

5010 IF Р0=0 THEN RETURN:REM SI INIT. 

5019 КЕМ ON DEPLACE LE PAQUET: 

5020 DX=1:DY=1 

5030 IF OX+DX)>)XM OR OY+DY>)YM THEN GOSUB 5300:RETURN 

5040 OX=0X+DX:0Y=0Y+DY 

5050 X=0X:Y=0Y:COSUB 2000:КЕМ PREND VALEUR EN 0Х,0Ү 

5060 IF VXY)48 AND УХҮ(58 THEN GÜSUB 5800:GÜSUB 5500:RETURN:REM SI ON TOUCHE UN 
CHIFFRE 

5070 IF UXY-BONUS THEN GOSUB 5600:RETURN 

5090 GOSUB 5500:RETURN:REM AFF. PAQUET 

5199 КЕМ INIT. LE PAQUET POUR DEPLACEMENT 

5200 AA=GETC:REM PRENDRE TOUCHE DU CLAVIER 

5210 IF AA=Q THEN RETURN:REM SI RIEN 

5220 PÜ-1:REM NE PLUS AFFICHER PAQUET SOUS TRANSPORTEUR 

5220 OX1=TX:0Y1=TY+1:0X=TX:0Y=TY+1 

5240 RETURN 

5299 КЕМ ---PAQUET SORT DE L'ECRAN--- 

5300 GOSUB 5400:REM EFFACE PAQUET 

5310 Р0-0:КЕМ LE REMETTRE SOUS TRANSPORTEUR 

5320 RETURN 

5399 КЕМ --- EFFACE SEULEMENT LE PAQUET --- 

5400  X=O0OX:Y=0Y:CAR=UIDE:GOSUB 1000:RETURN 

5499 КЕМ --- AFFICHAGE DU PAQUET --- 

5500 IF Р0(20 THEN 5550 

5505 КЕМ IL EST РОКТЕ РАК LE TRANSPORTEUR 

5510 OX=TX:0Y=TY+1 

5545 КЕМ EFFACAGE ANCIEN PAQUET: 

5550 X=0X1:Y=0Y1:CAR=VIDE:GOSUB 1000 

5555 КЕМ NOUVELLES COORDONNEES: 

5560 OX1=0X:0Y1=0Y 

5565 КЕМ AFFICHAGE DU PAQUET 

5570 X=0X1:Y=0Y1:CAR=PAQ:GOSUB 1000 

5580 RETURN 

5599 REM ON À TOUCHE LE BONUS 

5690 SC=SC+INT(RND(1)X3)K100:TF=TP+2:GOSUB 9000:REM AFFICHE SCORE 
5610 FJ=1:REM FIN DE JEU Ni 

5920 RETURN 

5799 КЕМ ON А TOUCHE DES POINTS 

5800 PS-(UXY-48)X10:TP-TP-PS:S8C-SC*PS:GOSUB 9000:REM AFFICHE SCORE 
5815 КЕМ VOIR 51 OBJET CONTINUE SA COURSE 

5820 IF RND(1)(0.4 THEN GOSUB 5300 

5830 RETURN 

5999 КЕМ ---- PLACE LES RANGEES DE POINTS ---- 

6000 FOR Y=DEBRA TO DEBRA+NRA-1 

6010 FOR Х=@ TO ХМ 

6020  CAR-RND(1)X9*49:FD-1:GOSUB 1000:REM AFFICHE UN POINT 

6030 NEXT X:NEXT Y 

6040 RETURN 

6999 REM --- PLACE BONUS --- 

7000 Y=FINLIG 

7010 FOR Ізі TO NBONUS1 

7020 X=INTC(RND(1)KX(XM-2XLIM))+LIM 

7030 GOSUB 2000:ІҒ UXY OVIDE THEN 7020 

7040  CAR-BONUS:GÜSUB 1000:REM AFFICHE BONUS 

7050 NEXT I 

7069 RETURN 

8999 КЕМ --- AFFICHE LES POINTS ---- 

9000 ТР-ТР-2 

9019 IF 5С) КС THEN RC=SC:CURSOR 13.23:PRINT RC;" В 

9020 CURSOR 29,23:PRINT SC;* d d 
9030 CURSOR 47;23:PRINT TP;* A. » 
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9040 
9050 
9499 
9500 
9510 
9520 
9530 
9998 
9999 
10000 
10010 
10030 
10040 
10050 
19940 
10989 
10100 
10110 
10120 
10159 
10500 
10998 
10999 
11000 
11010 
11020 
11030 
11040 
11200 


IF TP(@ THEN Ғ/аг2 

RETURN 

REM ---- AFFICHE SCORE ET RECORD ---- 
CURSOR 5,23:РКІМТ "RECORD RC" ^ 
CURSOR 23,23:PRINT "SCORE 
CURSOR 40,23:FRINT 'TEMPSz';TP;' Е 

RETURN 

КЕМ ---- INITIALISATION DES VARIABLES DU JEU ---- 
REM VALEURS GRAPHIQUES: 

Т5Р-24:КЕМ TRANPORTEUR 

FAG=1:REM OBJET 

BONUS=29:REM SUPER BONUS 

VIDE=32:REM CARACTERE ESPACE 

ІТҮВ1=ТҮВ:КЕМ HAUTEUR MINI. DU TRANSPORTEUR 
:TYH1=TYH:REM HAUTEUR MAXI. DU TRANSPORTEUR 
:NBONUSi=NBONUS:REM NOMBRE DE BONUS 
DEBRA=15:DEBRAÎ=DEBRA:REM DEBUT RANGEE DES POINTS 
МКА=5: МКА1=МКА: КЕМ NOMBRE DE RANGEE DE POINTS 
FINLIG-23:REM DERNIERE LIGNE ОО METTRE BONUS 
ТЕМР=10000:ТРі=ТЕМР : КЕМ DECOMFTEUR DE TEMPS 
RETURN 

REM ---- INIT. VARIABLES D'UNE MANCHE ---- 

REM INIT. TRANSPORTEUR: 
ТХ=@:ТҮ=ТҮН1:ТХ1=ТХ:ТҮ1=ТҮ:КЕМ INIT. COORD. 


КІМ-ҮМ-ТҮ:КЕМ LIMITE ECRAN OU METTRE BONUS DROITE/GAUCHE 
REM INIT. PAQUET: 
FO=@ 


IREM INIT. FIN JEU 
RETURN 


LA CHENILLE 


Aidez une pauvre petite chenille 
enfermée dans un enclos à se nourrir. 


BUT DU JEU ] enclos à la recherche de nourriture repré- [ 


AU CLAVIER 


Dodie, la chenille est prisonnière dans que nombre avalé, la chenille rejette son - Il faut introduire le nombre de joueurs et 
une zone délimitée par un fil électrique à équivalent de radio-activité, symbolisée ^ leurs prénoms. 
haute tension. Tout contact avec celui-ci par des points qui deviennent de nou- 
est mortel. La chenille doit parcourir son veaux obstacles. 


i 
10 WIFE: SCREEN 20, 220, 200, 220 

20 COLORO, 1, 2, 4:PRINTCHRS (16) 

30 DIMTJ (32,29) 

40 GOSUB120 

50 GOSUB150 

60 GOSUB290 

70 PRINT:PRINT:PRINT" VOULEZ-VOUS REJOUER (Q/N) т" 
ВО  RP$=INSTRS (1) 

90 IFRP$ 
100 IFRP$-"n'"THENWIPE:END 
110 GOTO80 


sentée par des ombres entre 1 et 9. Асһа- 


- Pour jouer, utilisez le joystick que vous 
connectez sur le port de gauche. 


? COPYRIGHT TILT MICRO 


o" THENGOTOSO 
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120 
150 
140 
150 
169 


* PRESENTATION 

MS=0:AJ=0 

RETURN 
CLS: OUTPUT"COMBIEN DE JOUEURS (max. 9) ?",30,130,2 

CURSOR30, 50:PEN1:PRINT"<RETURN> "$ : PENS: PRINT"pour recommencer avec": CURSO 


R60,38:PRINT"les mmes joueurs" 


170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 


RF$=INSTR$% (1) : NJ=VAL (КРФ) 
IFNJ=0 AND AJ=0 THEN GOTO150 

IFNJ=OTHENNJ=ñJ: 8070270 
CLS:PEN1:PRINTTAB(14)NJ; : РЕМ2: PRINT"JOUEURS" : PRINT 
FORI-1TONJ 

FRINT:PRINT"NOM DU JOUEUR"; : PENS: PRINTI; : РЕМ 
INPUT NOM$ (I) 

IFLEN (NOM$ (1)) >10 THENNOM$ (I)=MID$(NOM$(I),1,10) 
РЕМ2 A 
NEXT 
CLS: JO=1 : NPENP+1: АЈ=МЈ 
RETURN 
WIPE: CURSOR1S, 210: PRINT"JOUEUR"; : PENS: PRINTJO;": - "5: PEN1: PRINTNOMS (JO) 3: PE 


N2: PRINT" JEU"; :PENS: PRINTNF 


300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
,410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 
550 
560 
570 
0) 
580 
590 
600 


S(J0)=0:E=0 
FORI=1TO32:FORJ=1T029:TJ(1,J)=0:NEXT:NEXT 
FORI=18T0216 STEPA 
OUTPUT"#",1,18,1 
OUTPUT"#", I1, 198,1 
NEXT 
FORJ=18T0198STEP6 
DUTPUT"#",18,J,1 
DUTPUT"#",216,J,1 
NEXT 
А=2:Н=108: V=90 
В=Ј0Ү (0) 
1FB=00RE=S0RB=60RB=90RB=10 THENB=A 
A=B: HP=H: VP=V 
H=H+(((B=1)-(B=2) ) #6) 
МеУ-( ((В-4)-(В-В)) #6) 
ІЕН<-18 OR Н>-216 OR V<=18 ОК У>-198 THENGOTO540 
C=TJ (H/6-3,V/6-3) : IFC=1THENGOTOS40 
IFCS1THENS (JO) =S (JO) +C: E=E+C 
OUTFUT"*"„.H,V, 2: OUTPUT"#", HP, VP, O 
PAUSEO. ОВ 
IFE>OTHENOUTPUT"5",HP,VP, 1:E=E-1: TJ (HP/6-3,VP/6-3)=1 
IFRND (O, 10) 29. STHENGOSUB660 
GOTO410 
OUTPUT" *", HP, VP, 3: РОКІ=1 ТО500: ТОМЕІ, 5: NEXT 
IFFIRE (0) < >OTHENGOTO550 
WIPE:PEN2 
GCURSORSO, 150: PRINT"JOUEUR" ; z PENS: PRINTJO; : PEN2: PRINT" 


: PEN : РКІМТМОМФ CJ 


PRINT :PEN2: PRINT" SCORE : "3: РЕМ: PRINTS (JO) 
РКІМТ:РЕМ2 
IFS (JO) >М8 THENPRINT" NOUVEAU RECORD: 


: PEN : PRINTS (JO) :MS=S (JO) : M 


40%=МОМ% (JO) : GOTD620 


610 


PRINT" RECORD TOUJOURS DETENU PAR ": РЕМ№1 : РКІМТТАВ (10) МЈОФ; : РЕМ2: PRINT 


" AVEC"; : PENI+PRINTMS 


620 
630 
640 
650 
660 
670 
680 
690 
700 
710 


PEN2: JO=J0+1 : IFJO»NJTHENRETURN 

PAUSE 1 

IFFIRE (0) < >OTHENGOTO640 

GOTO290 

Z$=STR$ (INT (RND (2, 10) ) ) 

X=6% (INT (RND (4, 36) ) ) : Y=6% (INT (RND (4, 33) ) ) 
Z=VAL (Z$) : IFTJ(X/6-3,Y/6-3)=1 THENRETURN 
TJ(X/6-3, Y/6-3) 22 
OUTPUT Z,X-5,Y,2 

RETURN 


Glouton d'un nouveau 
genre, vous dévorez l'alphabet 
lettre par lettre 


ALPHABETOPHAGE 


BUT DU JEU 
En parcourant une zone bleue délimitée 
par le signe dièse, avalez le plus rapide- 
ment possible les vingt six lettres de l'al- 


ingurgitez mais la collision avec une mau- 
vaise lettre ou un obstacle bleu est mor- 
telle. 


AU CLAVIER 


- Ce logiciel s'utilise avec une manette de 
jeu connectée sur le port de gauche. 

- Aprés avoir choisi l'un des neuf niveaux, 
le jeu commence. 


р E а - - Pour continuer, pressez le bouton feu. 
phabet,dans l'ordre croissant. Vous pre- - Au départ vous êtes représenté par le 
nez la forme de la lettre que vous signe о). 


2 * COPYRIGHT TILT MICRO 
4 "еккен ж жэ AE EHE көннен 


57% ALFHABETOFHAGE * 
Ó "ЖЖЖ 
19 wipe 


20 color0,1,2,4 

SO dimTJ (32,19) ,REC(9):forl=1ito9:REC(1)=10000:next 
35 gosub3000 

40 gosub2000 

50 gosub1000 

60 output"VOULEZ-VOUS REJOUER (O/N) 
70 RP$-instr$(1) 

BO ifRP o"thengoto40 

90 ifRP$-"n"thenwipe:pen2: 
100 goto70 

999 * BOUCLE FRINCIFALE 
1000 Р=&5:А=2 

1010 B=joy (0) 

1020 ifB-OorB-5orB-óorB-9orB-10thenB-a 
1030 
1040 
1050 
1960 
1070 
1080 


2" 


з50,20,2 


епа 


H=H+ ( ( ( 
V=V- ( ( (B=4) - (В=8) ) *9) 
ifH=18thenH=210 


ifV=198thenv=27 

C=TJ (H/6-3.V/9-2) : i f C= ЖЕНЫ БОКОН 

ifC< >Pthengoto1180 

S=S+1:forI=100tolstep-l:toneI,S:next 
TJ(H/6-3,V/9-2)=0:plotH,V,6,9,2:plotH,V,6,9,0:plotAH, AV,6,9,1:plotAH, AV, 6, 


P=F+1:ifP=91thengoto1i200 

pen0:cursorAH, AV: printchr$(P-1):peni:cursorH,V:printchr$(P-1) 
outputT-1,72,210,0 

outputT,72,210,1 

pause (0. O5#N1+0. 02) 

gotoioio 

cursor AH, AV:pen0:printcehr$(P-1):output"x",AH, AV, 1 
forlI-1to200:tonel,S:next:forl-18to216stepó:plotI,210,6,9,3:next 
cursori8,210:pen2:print"PERDU ! VOUS AVEZ MANGE"; 3 "LETTRE"; :ifS»1thenpri 


nt "s" 


1195 iffire(0)<>O0thengotoll95 
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1196 print:wipe:goto1280 , Y 

1200 —forI-1toiO:forJ-5SOtoistep-1:toneJ,3:next, 

1210 flashs 

1220 iffire(0)<>Othengotoi220 

1250 wipe:pen2:cursor20,150:print"VOUS AVEZ GAGNE AVEC UN TEMPS DE:" 

1260 pen3:outputT,100,130,3 

1270 ifT£REC (N) thenpen2:cursor20,110:print" LE RECORD AU NIVEAU"; :pen3: print 
Nipenzi cuir sor 59,99: print "EST MAINTENANT"; :peni:printT:REE(N)-Tsreturn 

1280 penzrcursorzo,110:print^ LE RECORD AU NIVEAU“; :pen3: printN: pen2: cursor S 
0, 90:print "EST TOUJOURS";:penl:printREC N) 

1290 return 

1999 'INITIALISATIQN DU JEU 

2000 wipe:output"NIVEAÜ CHOISI (O => 9) ?".30,130, 2 

2010 RP$-instr$(1):N-val(RP$):N1-9-N 

2020 cursor70,100:pen3:print" NIVEAU": :peni:printN 

2030 pause2:T-0:8-0 

2040 wipe:cursori8,210:pen2:print"TEMPS :":cursor156,210:print'"NIVEAU :" 

2050 outputT,72,210,1:0uütputN,210,210,1 

2060 forI-s1to22:forJ-1to19:TJ(I,J)-0:next:next 

2070 forl=18to21é6stepé 

2080 output"x*".I,18,3 

2090 output"*",I,198,3 

2100 next 

2110 forJ=18to198step9 

2120 output"#",18,J,3 

2130 output"*",216,J,3 

2140 next 

2150 H=108:V=90 

2160 output"S".H,V,1 

2170 forI=65t090 

2180 X-6*(int(rnd(4,36))):Yz9*(int(rnd(4,22))) 

2190 ifX-H and Y=V thengoto2180 

2200 ifTJI(X/6-3,Y/9-2) «»0thengoto2180 

2210 TJ(X/6-3,Y/9-2) =1 

2220 pen2:cursorX,Ys:printchr$(I) 

2240 next 

2250 forI-1to26 

2260 X«ó*(int(rnd(4,36))):Y-9* (int (rnd (4, 22))) 

2270 ifX-H and Y=V thengoto2260 

2280 ifTJ(X/6-3,Y/9-2) 420thengoto2260 

2290 TJ(X/6-3,Y/9-2)=1 

2300 plotX,Y,5,8,3 

2310 next 

2320 forl-iOtoistep-i 

2330 outputl,108,210,1 

2340 toneiO0,100:pauseO.95 

2350 outputI, 108,210,0 

2340 next 

2370 return 

2999 ‘REGLES DU JEU 

3000 wipe 

3010 pen3:printtab (10) "¥ EEE E E EEE EEE 1 

3020 printtab(10)"* ";:penli:print"ALPHABETOPHAGE";:pen3J:print" ж" 

3030 printtab (10) "HHHH HH HEH ыы ын 

2040 pen2:print:print" En vous däplaëüant * l'aide de la":print" manette de je 
u gauche, vous allez":print" devoir manger dans l'ordre toutes":print" ies lettre 
в de l'alphabet." 

3050 print:print" Pour vous aider,l'absorbtion d'une":print" lettre vous tran 
sforme en cette":print" lettre,mais.. 
3060 print" ATTENTION !!!... zprint:print" La collision avec un d 
es obstacles":print" bleus ou avec une mauvaise lettre":print" est fatale!!" 
3070 print:print" A la fin du jeu,appuyez sur le":print" bouton de la manette 
pour continuer." 

3080 print:pen3:print" TAPEZ ";:peni:print"RETURN";::pen3: print" POUR COMMEN 
CER"; 

3090 RP$=instr$(1):ifRP$<>chr$(13)thengoto3070 


3100 cls:print:return 
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ee ANGLOMANIE 


> Entrez, еп vous amusant, 
dans les arcanes de la langue 
anglaise. Good luck | 


BUT DU JEU haut de l'écran. Vous devez donner suc- Au bout de trois réponses fausses, l'ordi- 

GE Ë КАД : nateur inscriten basdel'écran,la solution. 

pprofondissez vos connaissances sur les * l'infiniti 
verbes irréguliers. L'ordinateur vous pro- — * le prétérit AU CLAVIER : 

pose un verbe parmi tous ceux qu'il * le participe passé - Pour jouer, il suffit de faire «RUN» et de 

Contient en mémoire. ІІ apparaît alors en * la traduction française suivre les ordres donnés par l'ordinateur. 


5 ' COPYRIGHT TILT MICRO 
10 * IL FAUT PASSER EN MODE MAJUSCULES FOUR QUE CE PROGRAMME FONCTIONNE (CONTR 


20 міре:ѕсғееп 20, 220, 200, 220 

50 color0,1,2,4 

40 N=46 

50 dim B$(N),C$(N),D$ (N) E$ (N) ,S$ (N) 

60 cls:print:print:pen 1:print tab (10) "VERBES IRREGULIERS" 
70 printtab(16)"ANGLAIS" 

80 print:print:print:print 

90 pen 3:print"QUE CHOISISSEZ-VOUS 
100 реп 2:print:print:print" A.........ANGLAIS" 

110 print:print" Е.... . FRANCAIS" 

120 print:print" B. «POUR STOPPER" 

130 A$=instr$ (1) 

140 if A$-"s"then cls:end 

150 if А%<>"а" and A$<>"f" thengotoi30 

160 for Ізі to N:8$(I)-"":next 

170 restore 

180 for I-1 to N 

190 read B$,C$,D$,E$ 

200 B$(I)-B$:C$(I)-C$:D$(I)-D$:bE$(I)-Ef$ 

210 next BOUCLE DE LECTURE 

220 if A$="a" then goto290 

230 ” ANGLAIS А 

240 сізіреп 3:print:print" POUR CHAQUE VERBE PROPOSE, ":print "VOUS INDIQUEREZ D 
ANS L ORDRE 


250 print:print:print:pen 1:print" (1) "sspen 2:print"L INFINITIF" 
260 print:pen 1:print" (2) "$:pen 2:print"LE PRETERITE" 
270 print:pen 1:print" (3) іреп 2:print"LE FARTICIFE PASSE" 


280 goto340 

290 ° FRANCAIS 

ЗОО cls:pen 3:print:print" POUR CHAQUE VERBE PROPOSE, ":print"VOUS INDIQUEREZ D 
ANS L ORDRE :" 

310 printsprint:print:pen i:print" (1) "sspen 2:print"LE PRETERITE" 

320 print:pen еп 2:print"LE PARTICIPE PASSE" 

330 print:pen en 2:print"LA TRADUCTION FRANCAISE" 


540 print:print:print:penZ:print" TAPEZ :" 
350 реп2іргіпбіргіпі" C....POUR COMMENCER 
360 print:print" Besse FOUR STOPPER" 


370 R$-instr$(1):if R$="s"thengoto60 
380 if R$<>"c"thengoto370 

390 cils:print:print:print:print:print:print:printsprint" APRES CHAQUE REP 
ke 
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ONSE":print" APPUYEZ SUR A";:peni:print"RETURN";:pen2:print"ü" 
400 pause 3:cls 
410 M=0:K=0:goto470 
420 if int(M/10)<>(M/10) then goto470 
430 print"VOULEZ-VOUS VOTRE SCORE (0/N) ?" 
440 R$-instr$(1):if R$-"o"then goto450:else if R$<>"n"then goto440:else goto46 


Paso gosub?00 
460 cls:if O$-"n"thengotoó60 
470 I=int(rnd(i,N+1)) 
480 B$="":C$="":D$="":E$="" 
490 if S*(I)<>""thengoto470 
500 5%(І)-Б%(1):М-М%1:В-О 
510 if A$="a" thengoto570 
520 pen2:print" VERBE : "$:peni:printES$(I):E$-ES$(I):forJ-itolen (E$):printta 

b(13+J)"-";:next:flash 1,50 
530 EECH pen2: input"INFINITIF ?"$B$ 
540 input"PRETERITE ? 
SSO  input"PARTICIFE ? 
560 i '"f"thengotoó6i0 

NFINITIF : "i:peni:printB$(I):B$-B$(I):forJ-itolen(B$) :printtab(13 

TJ)"-"i:next:flash 1,50 

en2: input "PRETERITE ?";C$ 

АКТІСІРЕ Алшы 

E$ 

610 if B$-B$(I) апа d C$(1) and D$-D$(I) and ES$-E$(I) then gosubó70 

620 if B$=B$(I) and C$-C$(I) and D$-D$(I) and ES$-E$(I) then goto420 

630 if B$<>B$(I) or C$<>C$(1) or D$<>D$(I) or E$<>E$(1) then gosub730 

640 if В<5 thengotoó6io0 

650 if M-N thengoto900 

660  goto420 

670 ” BONNE REFONSE 


680 K=K+1 

690  forX-1to500 step2:toneX,5:next 

700 penl:print:print:print" 3** BONNE REPONSE 3**":flashispen2:pause4 
710 cls 


720 return 

730 ” MAUVAISE REPONSE 

740 В=В+1 

750 pen3:print" 3** MAUVAISE REPONSE 3**":tonel000,300 

760 if B=1 thenprint" VOUS AVEZ ENCORE DEUX ESSAIS" 

770 if B=2 thenprint" PLUS QU'UN ESSAI" 

780 if E=3 then gotoB40 

790 if B$<>B$(1) thenprint"ERREUR -> "$:pen2:input'"INFINITIF ?";B$ 

800 if C$<>C$(I) then penZ:print"ERREUR -> " en2:input"PRETERITE ?"; C$ 
810 if D$<>D$(I) then pen3:print"ERREUR -> "; :ре input "PARTICIFE ?":D$ 
820 if E$<>E$(I) then pen3:print"ERREUR -> " реп2: input "FRANCAIS “?";E$ 
830 return 

840 print" *** PERDU 3x" 

850 print"'LA BONNE REFONSE ETAIT FOUR":peni 
860 if A$-"a"thenprintB$(I):pen2:printC$(I);" 
870 if A$="f"thenprintE# (I) :pen2: printB$(I);" 
880 pause7 

890 cls:return 

900 ” SCORE 

910 Asint(K/Mx1000)/10 


$OD:" ғы E#(1) 
СФ СІ)" , "sD#(I) 


920 cls:pen3:print" VOTRE SCORE EST DE :" 
930  print:printspeni:printtab(S)K;:pen2:print" REFONSES SUR 
940 print:print:print" SOIT "i:peni:printà: 


950 print:print:print:pens 
960 if 6-100 thenprint"VOUS ETES INCOLLABLE !! 
970 if A>75 and А<100 thenprint"C'EST TRES BIEN '" 
980 if A350 and A<=75 thenprint"C^EST PAS MAL" 
990 if A: and A<=50 thenprint"FAITES UN EFFORT" 
1000 if =25 thenprint"HUM ti" 
1010 pause 10:реп2 
1020 -if N thengoto1040 

1030  print:print:print:print:print:print:print"ON CONTINUE O/N) ?":0$-instr$(i |, 
(RCE DILE 


119 


ЕЕ BE “а т cul 3 o 26s 


120 


):if O$<>"o" and O$<>"n" then cis:goto10:0 


1040 cls:penl:print:print:print:print" 


:goto60 


1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1150 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 


data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 


3** TERMINE *** 


BE, WAS, BEEN, ETRE 

BEGIN, BEGAN, BEGUN, COMMENCER 
BITE, BIT, BITEN, MORDRE 

BRAKE, BROKE, BROKEN, CASSER 
BRING, BROUGHT, BROUGHT , APPORTER 
BURN, BURNT , EURNT, BRULER 

BUY, BOUGHT , BOUGHT , ACHETER 
CAN, COULD, , POUVOIR 

CATCH, CAUGHT , CAUGHT, ATTRAFER 
COME, САМЕ, COME , VENIR 

DO, DID, DONE, FAIRE 

DREAM, DREAMT , DREAMT , REVER 
DRINK, DRANK, DRUNK, BOIRE 
DRIVE, DROVE, DRIVEN, CONDUIRE 
EAT, ATE, EATEN, MANGER 

FALL, FELL, FALLEN, TOMBER 

FEEL, FELT, FELT, SENTIR 

FIND, FOUND, FOUND, TROUVER 

FLY, FLEW, FLOWN, VOLER 

FORGET, FORGOT , FORGOTTEN, OUBLIER 
GET (ON) , GOT (ON) , GOT (ON) , MONTER DANS 
GIVE, GAVE, GIVEN, DONNER 

GO, WENT, GONE, ALLER 
HAVE, HAD, нар, AVOIR 

HEAR, HEARD, HEARD, ENTENDRE 
HURT, НИЕТ, HURT, BLESSER 

KEEP, KEPT, KEPT, GARDER 

KNOW, KNEW, KNOWN, SAVOIR 

LEAVE, LEFT, LEFT, QUITTER 

LOSE, LOST, LOST, PERDRE 

МАКЕ, MADE , MADE , FABRIQUER 
MEET, MET, MET, RENCONTRER 

PUT, PUT, PUT, METTRE 

READ, READ, READ, LIRE 

SAY, SAID, SAID, DIRE 

SEE, SAW, SEEN, VOIR 

SIT, SAT, SAT,ETRE ASSIS 

SHINE, SHONE, SHONE, BRILLER 
SHOW, SHOWED , SHOWN, MONTRER 
SPEAK, SPOKE, SPOKEN, PARLER 
STAND, STOOD, STOOD, ETRE DEBOUT 
TAKE, TOOK, TAKEN, PRENDRE 

TELL, TOLD, TOLD, RACONTER 
THINK, THOUGHT , THOUGHT , PENSER 
WAKE UF, МОКЕ UF, WOKEN UP, SE REVEILLER 
WRITE, WROTE, WRITTEN, ECRIRE 


"pause 3 


В| 


СВАТҮ-ВАМб$ 


L'alarme vient de retentir, 
courez vers votre O.V.N.I. et décollez 
au plus vite, 


BUT DU JEU E 


Aprés la mission delta, vous revenez vers 
la piste d'envol. Oh surprise ! Celle-ci a 
disparu . À la place vous découvrirez une 
multitude de buildings. Il faut les abattre 
un à un sans relâche. La première colli- 


Sion avec un gratte-ciel vous sera fatale. 
Tirez juste, car vous n'avez que trois vais- 
seaux. 

AU CLAVIER 


- Ce logiciel nécessite l'utilisation d'une 
manette de jeu à connecter sur le port de 


gauche. 
- Pour jouer, il suffit de suivre pas à pasles 
instructions que vous donne l'ordinateur. 


160 
170 
180 
190 


200 
210 
220 


230 
240 
250 
260 
270 
280 
290 
300 
310 
320 


220,0: goto220 


10 ' K8S*8*8X8XBXBXEXBXGXSX 5⁄6 # 6 # 6 5% 
20 ° #5#*5*56*5 5#6#*6#5#*5* 
50 ' ж8ж8ж8ж8 CRAZY-BANGS 5#*5#5*5#5* 
40 * *8x*8*8*8 S*S*8*8*8x 
SO ' *SXB*S*65*B8XBXBXE*SXBSXBXSXSXGXBX 
80 82-200 

90 MM$-"Patrick" 

100 S 3866 

110 C 92 

120 Кш-1 

130 error2480 

140 wipe 

150 gosubi770:gosubi700:gosubó690 


gosub1470: gosub1970 
gosub 1220 

gosub400 

forT=0to70stepé: outputchr$ (СН) , T, 220, 3: pause. 04:outputchr$ (CH) „T, 220, 0: next 


gosub1010: output "ALT. ", 170,220,2 
outputchr$(192),30,220, 1:0utputchr$(196),45,220,2: outputchr$(194),60,220,3 
gosub230: outputY, 190, 220, 3: gosub290: gosub530: gosub310:gosub330: outputY, 190, 


X=X+10:Q1=01+1:ifX>240thenX=00:02=02+P 
ifJ=1thenY=i nt (sin (01) xTT+02) : el ѕеү=02 
ifQ2<40thengosub 1800 
ifCH=194thensound4, 22: el sesound4, 40 
S=S+1 

return 

Qutputchr*(CH),X,Y,C1 

return 

outputchr$(CH),X,Y,0 

return 

ifC=ithengosub370:return 

A=02 

iffire(0)=0thenXX=X:C=1 

Z=int (rnd (15, Y-20)):return 
A=A-10:outputchr$ (193) , XX, A,2:S=5+20:0utputchr$ (193), XX,4,0:ifA€ZthenC=0: A= 


ifpoint (XX+5, A-10) <>Othenplot XX, A, 10, 20,0 
return 


wipe:sound7,4096:brighti:color0,1,7,3 
410 forD=10to220step10:E=int (rnd (20, 150) ):plotD,E,10,E-15,E:outpu: :D+2,E+4,E 
output"!",D+2,E+3,E:lineD+1,E+1,D+8,E+1,E > 


121 


420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 


530 


forW=20toEstep4:output"..",D,W,O:next:next 
Х-10:02-200:Ү-200 


return 

restore450:forI=%&FBO0to%FB30:readN:pokeI,N:next 

data9,8 

data128, 192,248,254,063, 112,096,000,000 

data000, 040,056, 056,056, 056, 016,016,016 

data24, 0,126,126, 24, 124,146, 145,00 

data147,92,124, 63,148,124, 28,42, 72 

data0,0,0,192,248,063, 112,000,000,000,0,0,0,0 

return 

ifpoint (X+9,Y-7) 4»OthensoundO, 4096: sound3, 258: outputchr$ (195) , X, Y, 1:pause.7 


:outputchr$(195),X,Y*2,2:pausei:sound3, 275: goto560 
540 ifpoint (X+7, Y-8) <>0thensoundO, 4096: sound3, 258: outputchr$ (195) , X, Y, 13pause. 7 
:outputchr$(195),X, Y*2,2:pauseli:sound3, 275:goto560 


550 
560 
570 
580 
590 
600 
610 
620 
630 
640 
650 
660 


670 
680 
690 
700 
710 
720 
730 
740 
750 
760 
770 
780 
790 
воо 
810 
820 
830 
840 
850 
860 
870 
880 
890 
900 
910 
920 
950 
940 
950 
960 
970 
980 
990 


return 

wipe:color0,6,5,4 

gosub1600 

output" COMMANDANT ", 50, 130, 1: outputNN$, 120,130, 1 
S=-S*P 

ifPz-SthenS-int(S/1.4) 

output"VOTRE SCORE",70,110,2:0utput8,150,110,2 
2:200: 67200: X20: pauses 

ifS»SSthengosubi090 
S=0:cls0:color0,7,1,3:J=0:goto170 
restore650:forTO=1to14:readF,T:toneF,Tinext 
data205,170,167,180,140,180, 140,190, 140,150, 164, 180, 140, 180, 164, 180, 190, 180 


data190,150,214,150,187,150,214, 150,228, 200 
return 

wipe 

brighti:color0,7,1,3 
plot89,200,10,120,2 
plot90,198,8,116,0 
line85,170,89,170,2 
line85,110,89,110,2 
plot20,220,65,200,2 
forXE=25to0o80step10 
forYE-210to40step-15 
Kk=rnd (1,1000) 

i fKK>400thenC0=0: el ѕеС0=5 
plotXE,YE,S5,8,CO 

next, 

restore820 

forAA=1to11 

readL$ 
outputL$,91,205-AA#10, 1 
next 

dataC,R,8,2,Y, ,B,A,N,G,S 
datassssssss - 
pausei 
forIsito3:color0,0,1,3:pausei:colorO,I,1,3:pausei:next 
outputchr$(192),170,170,3 
gosub1670 

со10ғ0,7,1,5 

poke&SFES, 0:poke&SFE4,£&FB:gosub450 
gosubé50 

gosub1010 

pausel 

wipe 

brighto 


1000 return 

1010 restore870 

1020 forT=90to206stepé 

1030 readL$:outputchr$(CH),T,220,3 
1040 pause.05 

1050 outputchr$(CH),T,220,0 

1050 outputL$,T,220,3 


1070 next 
1080 return 
1090 wipe 


1100 color0,6,3,2 

1110 output"ancien record",70,160,1 

1120 outputMM$,50, 140, 1:outputSS, 120, 140,1 

1130 output "COMMANDANT ",40,110,2 

1140 outputNN$,110,110,2:0utput"vous etes un CHAMPION !!",45,90,2 

1150 output"VOTRE SCORE : ",50,70,2:0utputS,140,70,3 

1160 flash3,10 

1170 pausei 

1180 forA=1to25:R1i=rnd (50, 100) :R2=rnd (100,200) :toneR1,R2:next 

1190 SS=S 

1200 MM$=NN$ 

1210 return 

1220 seedtime(1) 

1230 wipe:CH=0: XX=0 

1240 SC=SC+1: i fSC>3thenSC=0:goto160 

1250 TT=int (rnd(15,1)) 

1260 color0,4,3,1:bright(1) 

1270 1іпе20,20,20,210,1 

1280 line220,210,1 

1290 1іпе220,20,1 

1300 11пе20,20,1 

1510 output "MISSIONS", 3O, 219,1 

1320 output "HIGH SCORE ",120,219,1:0utputS8,180,219,3 

1330 print:print" “"s:forA=itoSC:print"#";:next 

1340 output" COMMANDANT  ",40,200,2 2 

1350 outputNN$,110,200,2 

1360 output"ETES VOUS UN ",72,180,1 

1370 output"KAMIKAZE",71,149,3 

1380 outputchr$(194),140,150,1 

1390 output"CONFIRME",71,119,3 

1400 outputchr$(196),140,120,1 

1410 output"TOURISTE",71,89,3 

1420 outputchr$(192),140,90,1 

1430 output"VOTRE DECISION ?",50,40,2 

1440 tone100, 100 

1450 gosub2400 

1460 gotoi80 

1470 cls:color0,5,6,3:pen3 

1480 NN#="" 

1490 output"VOTRE NOM ?",80,120,1 

1500 cursor80,90 

1510 forNN-1to12 

1520 N$-instr$(1) 

1550 ifasc(N$)»96thenN$-chr$ (asc (N$) -32) 

1540 ifN$=chr$ (13) thenNN=13: goto1570 

1550 printN$; 

1560 NN$=NN$+N$ 

1570 next 

1580 i fNN$=""thenNN$="TOLROUILLEE" 

1590 return 

1600 cls 

1610 1іпе0,0,200,110,0 

1620 forA=0toS/10stepS/1000 

1650 line2*cos (А) #40+120, 2%5іп (А) *50+110,3 

1640 next 

1650 cls 

1660 return 

1670 forA=0toS0step.7:1ine200, 115, 120+A, 60-A, A:next:forA=0to10step.5:l1ine220,12 
4, 200+A, 125-A, Ainext: forA=0toi0step.5:1ine200+A, 125-A, 135+A, 40-A, А: пехё 

1680 forA=2toB:line135+4,40-A,108+A,0,2:next 


1700 poke%5FE3,%1D:poke%45FE4,%FB 


1710 restore1740 
1720 for FB1Dto%4FB3C:readN: pokeA, N 
1730 next 


123 


1740 
1750 
1760 
1770 
1780 


1790 
1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 
1910 
1920 
1930 
1940 
1950 
1960 
1970 
1980 
1990 
2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 


2090 
RIR." 
2100 
2110 
2120 


2130 
2140 


2520 


roleur 


data30,8 
data0,0,0,192,112,56,28,28,30,14,14,14,15,7,7,7,7,7,7,6,6,6,12,8,0,0,,,, 
return 
cls:color0,6,4,5 
i fpot (0) >200thenoutput"et ben mon vieux on a perdu son cont 
1",60,120, 1:elsereturn 
goto1780 
output "ENFIN LA TERRE FERME !",60,120,1 
P1-10:X-0 
plotO,40,240,40,0 
line0,28,240,28,1 
Х=Х+Р1 
P1=P1-.5 
outputchr$(CH),X,39,C1 
ifX=104.S5thenQ2=200:X=0:P=P-2:pause2: goto1910 
pause. 1 
outputchr$(CH),X,39,0 
gotoi840 
forA=106to238step? 
output",",4,38,3 
pause. 1 
output",",4,38,0 
next 
gotoi180 
wipe:color0,4,5,3:peni 
print:print:print:print:print:print:print:print" BONJOUR "i HN 
gosub2330 
gotol1990 
wipe:color0,5,6,3:brighti:cls2 
screen20,200,200,170:c1s0 
line19,30,19,201,3 
line220, 201,3 
line220, 30,3 
line19,30,3 
screen30, 180, 180, 150 
peni:print"VOUS VOICI А BORD D'UN ENGIN VOLANT IDENTIFIE MAIS 
"$:pen2:print" MEGAPOLIS":print 
penS:print'LA CELEBRE VILLE, VOUS ЕМРЕСНЕ  D'APPROCHER FOUR ATTER 


print:pen3:print"D'apres vous, que devez vous faire ?" 
pause 8:cls 
print"OUI „VOUS AVEZ TROUVE; IL S’AGIT BIEN DE REDUIRE LES AFFREUX IM 


MEUBLES MAIS ATTENTION А N'EN RATER AUCUN SINON VOUS LES PERCUTEREZ ..." 


print:pen2:print"VOUS AVEZ LE CHOIX ENTRE 3 MAGNIFIQUES VAISSEAUX ." 
plot50,30,140,25,3 

output"Fire pour continuer",60,20,0:iffire(0)<;Othengoto2150 
&creen20, 200, 200, 170:c1s0 

cls:colorO,2,6,3:pen3 3 

print:print" LE KAMIKAZE : "š:penl:printchr%(194):pen2 

print:print"C'est un satellite motorise en perdition dans l'atmospher 


penZ:print:print" LE CONFIRME : "ispeni:printchr$(196):pen2 


.print:print"Voici un professionnel du vol en rase-mottes ." 


penS:print:print" LE TOURISTE : "s:peni:printchr$(192):pen2 
print:print"Un homme tranquille ..." 
iffire(0)<>0thengoto2240 
cls:colorO.1,6,3:print:peni 
print"ATTENTION ! "i:pen2:print"IL FAUT ATTERRIR SURLA FISTE QUI АРРАКАТТ 
LA FINDE LA DEMOLITION DES GRATTE-CIELS" 

print:pen3:print"Le score a battre est 
pen2:print:print"ALORS BONNE CHANCE ..." 
iffire(0)<>0thengoto2290 

Y=50:4=0 © 
forX=20to215stepz: 


speni:print" 23866 !" 


=A+. 07: Y=Y+A: Y=min (Y, 100) :outputchr#(194),X,Y,2:pause.0 


A:outputchr$(194),X, Y, O:next 


wipe:goto1220 


2330 output"Voulez vous des explications",42,115,1 
2340 output"Voulez vous des explications",43,116,3 


124 


2350 
2360 
2370 
2380 
2390 
2400 
2410 
2420 
2430 
2440 
2450 
2460 
2470 
2480 


goto2360 
A=1:B=0:77=10:S1=0 
Y1=120 


EN 
ifY1=90thenF: 
return 


output" (BOUTON de TIR = QUI",61,100,2:output"MANETTE = 
iffire(0)=0thengoto2010 
ifjoy(0)<>Othengoto1220 


output "<=", 155, Y1,0:ifjoy(0)=4thenYi=Y1+30:elseif јоу (0)=8thenY1=Y1-30 
Yi=min(Y1,150) : Yi=max (Y1,90) 
output "<{-",155,Y1,2:pause.07:iffire(0)=0elsegoto2410 
ifY1=150thenF=-10:J=1:CH=19. 


wipe:color0,1,7,3:pen3:print:printEC,EL:pen2:print:print" 
а l'auteur":peni:print:print" 
une touche pour continuer":R$-instr$(1):EC,EL-O:run 


LA PETANQUE 


Patrick LHULLIER":penS:print:print" Tapez 


NON) ",79,90,2 


parlez en 


Vous partez passer quelques jours 


dans le midi de la France. Il fait chaud et aprés une petite sieste, 
vos amis vous proposent une partie de boules 


à l'ombre d'un platane. 


BUT DU JEU 


ісі, les règles diffèrent légèrement de 
celles du jeu de pétanque classique. Il faut 
envoyer une balle sur l'un des trous 
rouges placé à l'extrémité du terrain. 
Autre changement, vous ne lancerez pas 
la balle à la main, mais à l'aide d'un club 
de golf. Vous pouvez vous déplacez sur le 


terrain, pour trouver le meilleur angle de 
tir. Attention, suivant le niveau de jeu, la 
trajectoire de la balle est plus ou moins 
étrange et le temps de jeu est de plus en 
plus restreint. 


AU CLAVIER 


- Ce logiciel nécessite l'utilisation d'un 
contrôleur à main, qu'il faut connecter sur 


le port de gauche. 

- Choisissez un niveau de jeu parmi les 
quatre proposés. 

- Vous vous déplacez en utilisant la ma- 
nette de jeu. Pour tirer, pressez le bouton 
de feu. 


5 wipe 


зо 
so 
70 
90 


datai2,8 


150 
170 
190 
210 
230 


270 
272 
275 


daten 
реп1 


тво 


gosub2000 
276 spund7,4096:wipe 
plotX,Y*12,8,12,0 


285 ploti75,170,12,35,0 
286 М=0 z > 


10 forI=Oto110:readA:pokeI+kFBOO,A:next 
poke&SFE3,0 
рокем5ғЕ4,МЕВ 


data0,12,12,30,30,30,30,60,76, 140, 140,30 
110 data192,140,140,94,94,62,30,28,12,12,12,30 
130 data7,8,8,16,16,16,32,32,32,32,64,64 
data128,64,64,48,16,16,8,8,4,4,2,1 
datal,1,1,1,1,1,2,4,4,8,16,224 
dataé4,64,64,64,64,64,32,32,48,24,12,3 
data12,8,114,189,129,129,129,129,129,129,90,36 
data102,36,36,165,131,0,131,165,36,36, 102,0 
250 data254,254,120,34,10,164,34,111,54,11,254,254 


oe NE 


125 


288 brighti. 

290 forV=ito240stepse 

295 plotV,15,1:next 

310 со10ғ0,1,7,2 

320 ifL»7andL«10thenoutputchr$(198),20,220, 1; WW-WW*. 5 
521 ifL»10andL«Xi7thenoutputchr$(199),30,220, W=WW+.5 
322 ifL»17andL425thenoutputchr$(200),40,220, W=WW+1 
323 ifL»25andL«435thenoutputchr$(201),50,220,2: WW-WW*2 
330 Xarnd(175,185):Y-2rnd (140,150) 

350 plotX,Y,3,4,1 

370 X-rnd(175,185):Y-2rnd (160,170) 

390 plotX,Y,3,4,1 

410 output"SCORE",90,222,2 

430 screeni30,230,60,20 

455 сів2 

440 screeni5, 105,210,75 

450 c1s2 

460 gosub1900 

470 outputL, 160,223,0 

490 X=20:Y=115 

510 A=joy(0) 

520 plotX,Y,23,6,0 

520 W=W+WW 

550 ifW=2400rW>230+WWthenflashO:wipe:run 

555 ifW=100thengosub1950 

560 output"<",W, 20,2 

564 pause.1 

565 output"<",W, 20,0 

570 output"=",W, 20,2 


580 pause.0s 
590 output"=",W,20,0 


630 gosub1670 

650 ifA<>0Othenoutputchr#(192),X,Y,0 
670 B=int(pot(0)/4):ifB<ithenB=1 
690 ifA=0thengoto8?70 Ix 
710 onAgoto730,750,,770,790,810,,330,850,870 
230 X=X-B:g90t0890 

250 X=X+B: g9g0t0890 

770 Y=Y+RB:g9g0t0290 

X-B:Y2Y*B:goto89o 
X*B:Yz2Y*B:gotoe20 

830 Y=Y-B:g90t0870 


850 B: Y=Y-B: g0t08390 
870 Х=Х+Р:Ү=Ү-В 
290 з 151570 


‘230 outputchr$(192) ,X,Y,2 

950 iffire(0)=0thenoutputchr#(192),X,Y,0 
970 iffire(0)=0thengoto790:elsegotos1i0 
990 iffire(O)-Othengotol1010 

1010 E-X 

1030 С=0 

1050 F-pot(0):P-2max(30,P):P-min(150,F) 
1070 outputchr$(193),X,Y,2 

20 

int (rnd(25,60)) 

64 

C+D 


sin(C):ifSXOthenS--S 
S*R+Y . 
min(F,200):F=max(15,F) 
тіп (E,240):E=max(E,0O) 
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1270 

1290 
1310 
1330 
1350 
1370 
1590 
1400 
1405 
1410 
1430 
1450 
1470 
1490 
1510 
1530 
1550 
1570 
1590 
1610 
1630 
1650 
1670 
1690 
1710 
1730 
1750 
1770 
1790 
1810 
1830 
1850 
1870 
1890 
1900 
1910” 
1920 
1930 
1940 
1945 
1950 
1960 
1970 


2000 
2010 


2020 
2030 
2040 
2050 
2060 
2065 
2070 
2075 
2076 
2077 
2078 
2079 
3000 


3003 
3005 
3010 


ifF<Y+2.6andR>Sthentone10,10 

ifC»Tthengoto510 

PlotE,F*R-12,2,3,2 
ifpoint(E*2,F*R-12)-1thenL-L*1:o0utputchr$(193),X,Y,O0:goto3000 
ifpoint(E*2,F*R-13)-1thenL-L*i1:outputchr$(193),X,Y,0:goto3000 
ifpoint(E*2,F*R-14)-1thenL-L*1:outputchr$(193),X,Y,0:goto3000 
ifpoint(E*2,F*R-11)-1thenL-L*1:o0utputchr$(193),X,Y,0:goto3000 
ifpoint(E-1,F*R-13)-1thenL-L*1:0utputchr$(193),X,Y,O: goto3000 
ifpoint(E,F*R-13)-1thenL-L*1:outputchr$(193),X, Y, O: goto3000 
plotE,F+R-12,2,3,0 

ifE=240thengotos1io 

R=R-.5 

ifR<3thenP=20 

ifpoint(X+5,Y)=2thenrun 

ifpoint(X+3,Y-2)=ithenrun 

R=max (0,К) 

goto1130 

X=min(X, 105) 

X=max (X, 10) 

Y=min(Y, 195) 

Y=max (Y, 130) 

return 

’ TRACE TERRAIN 

1ineO, 200, 240, 200,3 

line70,200,35,115,3 

line50,200,0,110,3 

line190,200,240,110,3 

line0,115,240,115,3 

line185,180,212,130,3 

linei60,180,175,130,3 

lineié0,180,185,180,3 

line175,130,212,130,3 

line120,115,115,200,3 

return 

репо 

print"VOUS ETES SUR UN TERRAIN DE BOULES" 

print 

print"IL FAUT TIRER SUR LES TROUS ROUGES" 

print 

return 

print:print:print:print"DEPECHEZ VOUS !!" 

print:print"LE TEMPS PASSE..." 

return 

e force. 

wipe 

print:print:print:print"VOTRE FORCE ?":print 

print" 4-0eil de lynx " 

print:print" S-bon" 


print:print" 2-2moyen" 
print:print" i=nouveau" 
sound5,4056 

inputWW 


onWWgoto2076,2077,2078,2079 

WW-O:return 

WW-2:return 

WW=4: return 

WW=é:return 

Brint:printiprint:iprint".. ir asla ale BRAVO. $7525 2 ess se 
“: : 

sound3, 268 Vous etes un AS sprint:print 


color0,1,2,3 
pause4 » 
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5011 
3020 
3030 
3040 
3050 
3060 
3070 
3080 
3090 
3100 
3110 
3120 
3130 
3140 
3150 
3160 
3170 
3180 
3190 
3195 
3200 
3210 
3220 
3230 
3240 
3250 
3260 
3270 
3280 
3290 
3300 
3310 
3320 
3330 
3340 
3350 
3360 
3370 
3380 
3390 
3400 
3410 
3420 
3430 
3440 
3450 
3460 
3470 
3480 
3490 
3500 
3510 
3520 
3530 
3540 
3550 
3560 
3570 
3580 
3590 
3600 


sound7, 4096 
goto280 
wipe 


c010r0,1,2,3 


A-10 

B-4 

С-5 

D=5 

E=4 

P=230 

@=230 

M=15 

0-9 

X210 

х=х+А 

M=M+D 

O=0+B 

P=P-C 

Q=Q-E 
iffire(O)-Othengotol 
plotx,50,10,3,1 
plotx*-A,50,10,3,0 
plotM,54,10,3,2 
plotM-D,54,6,3,0 
plot0,58,4,2,3 
plotO-B,58,4,2,0 
plotP,62,4,4,1 
plotP*C,62,5,4,0 
plot8,46,8,2,3 
plotG*E,46,8,2,0 
ifX»2200rX«10thenA--A 
ifM>230orM<10thenD=- 
ifQ<100rQ7>230thenE=-) 
if#P<10orP>230thenC=-C 
if0>2300rO0<10thenB=- 
goto3150 

wipe 

X=110:Y=970 

С=4 

М=220 

gosub3690 

M=100:N=100 
A=100:B=100 

J=joy (0) 

P=pot (0) 

P=P/50 
outputchr$(30),X,Y,0 
gosub3540 
lineX,Y,cos(P)*10*X,sin(P)X20*Y,1 
outputchr$(30),A,B,0 
outputchr#(50),M,N,O 
gosub3640 
lineX,Y,cos(P)#10+X,sin(P)x20+Y,0 
90105450 
ifJ»-4andJ4-óthenY-Y*8 
ifJ»-8andJ«-10thenY-Y-8 
if 2orJ-6orJ-10thenX-X*8 
ifJ-1orJ-5o0rJ-9thenX-Xx-8 
gosub3760 
outputchr$(30),M,N,2 
outputchr#(30),A,B,3 
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3620 
3625 
3630 
3640 
3650 
3660 
3670 
3680 
3690 
3700 
3710 
3720 
3730 
3740 
3750 
3760 
3770 
3780 
3790 
3800 
3810 
3820 
3830 
3840 
3850 


autoutehné (TO) ,Y,vY,1 
iffire(O)-OthenC--C 
ifinkey$(5)="a"thengotol 
return 

ifx<AthenA=A+4:elseA=A-4 
if*x<MthenM=M+C:elsem= 


ifY<BthenB=B+4:elseB= 
ifY<NthenN=N+C:elseN=N-C 
return 

forI-&FBOOto&kFBOD 

readN 

pokeI,N 

next 

return 


data6,6,112,32,248,112,112,80 


data0,0,0,0,0,0,0,0,0 
X=min (X, 200) :X=max (X, 20) 
A=min (A, 195) :A=max (A, 25) 
M=min (M, 195) :M=max (M, 25) 
Y=min(Y,200):Y=max(Y,20) 
B=min(B,195):B=max(B,25) 
N=min (N, 195) : N=max (N, 25) 
return 

printA,chr*$(A) 

A=A+1 

goto3830 


LASER 200- 210 


SQUAS 


Prenez votre raquette 


et partez avec un ami disputer 


une partie amicale. 


BUT DU JEU 


Vous devez rattraper une balle à tour de 
rôle, à l'aide d'une raquette, II est inutile 
de tricher car le Laser 200 veille à tout. 
Une partie est terminée lorsque le score 
d'un joueur atteint au moins 10. 

Vous pourrez jouer violemment en blo- 
quant la balle de l'adversaire, car les ra- 
quettes ne peuvent se superposer. ll est 


ainsi possible de gêner l'adversaire en 
vous plaçant sur la trajectoire de la balle. 11 
devra alors vous contourner pour jouer à 
Son tour. 

Vous pourrez jouer soit seul contre l'ordi- 
nateur, soit avec un ami. 


AU CLAVIER 


- Pour déplacer l'une ou l'autre raquette, 
utilisez l'extension manettes de jeu. 


- Donnez le nombre de joueurs, pour com- 
mencer. S'il n'y a qu'un joueur, ce dernier 
utilise le joystick de gauche. 

- Ensuite pressez une touche pour servir. 
- Attention, les caractéres semi- 
graphiques du listing correspondent aux 
touches à presser sur le clavier. Mais le 
résultat à l'écran est inversé. 

- Ce logiciel nécessite l'extension 16 Ko 
de mémoire vive et l'extension joystick. 


1 REM COPYRIGHT TILT MICRO 
5 DIMJC12, XC12, YC12 
19 CLS:PRINTG109, "SQUASH" 


20 PRINT"NOMBRE DE JOUEURS 1-2)" ;:INPUT 


D:IFABSCD2? 2THEN20 


30 D-RBSCD)-1:JC80)-20:JC12-8 :DT-1:TE-DXCR 


NDC22-12 


CLS :COLOR3, 1 


3 


120 FORI-32T0480STEP32 


130 PRINTG 
LEI 


sla] TTT TT TT T TTT TT 
mam 


140 NEXT 
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:60SUB3000 
INDCO) X C3-2XRNDC22) 


220 FORIsOTOD:IFJCI)-10THENPRINTG479*XCI 
3, "FINI" j tENDELSENEXT 

230 PRINT8426*X(TR) , "SERUICE" ; :R$=INKEYS 
:COLOR3 

240 IFINKEY$=""THEN240 

250 PRINT04264X(TR)," n 

300 TR-D-TR 

500 FORI-TRTOD-TRSTEPD-2XTR :0D- C INPC43*3 
XIJAND31) 

510 MO=0D-4XINTC0D/4):X=X(1):Y=YCI) · 
520 IFOD>24AND0OD<28ANDX) 4ТНЕМХСІ)=Х-2 


530 IFOD>28ANDOD<24ANDX<38THENXC I +2 
540 IFM0=1ANDY<14THENYCI)=Y+1 


550 1FM0=2ANDYY2THENYCI)=Y-1 
555 IFD=1ñNDY(0)=Y(1J)ñNDñABS(X(0)-X(1))<3 
THENXCIJ-X:YCIJ-Y 

560 COLOR3: PRINT8X*32XY-34; "шшш"; :GOSUB 
3088 

520 NEXT 

600 Х1=АЖҮВ+ХӘ :Y=YB+DY :X=AXY+X0 :С=0 

619 ІҒҮ=@ТНЕМС=1 :DY=-DY:Y=YB 

620 IFX<30RX>32THENC=1 $ 

630 IFDY>BANDABSC(X-XCTR))<3ANDABSCYCTRI- 
Y) <ІТНЕМС=2 :DY=-DY 

640 IFC>GTHENSOUND25; 1: 
Т=ҮВ :X0=X1-AXYB = 
658 IFY>14THENJ(D-TR)=J(D-TR)+1:GOTO100 
660 COLOR3:PRINTE32XYB+X1-33, "ш" ; 
620 YB=Y:PRINT@AXY+X0+32XY-33, "n" ; 

680 IFC=2THEN300 

692 6070500 

3000 COLORI*6:PRINTGXCI)*32XYCI)-34, "шшы 
"3 RETURN 


=RNDCB)XSGNC-A) : 


d 


CAR FIGHT 


De nombreux fous du volant 


hantent les autoroutes de votre ville. 
Aux commandes d'un bolide équipé d'un canon laser, 


vous poursuivez les malfaiteurs. 


BUT DU JEU 


Vous devez amener une à une les voitures 
rebelles au centre du viseur, puis les abat- 
tre. Elles apparaissent d'abord dans le 
rétroviseur et ensuite devant votre pare- 
brise. Lorsqu'une voiture ennemie est 
identifiée par l'ordinateur de bord, un ca- 
ractère lumineux clignote. Mais attentioı 
votre temps est compté. Aprés avoir di 
truit plus de six voitures, celles-ci ripos- 
tent, faites trés vite une embardée pour 


© REM COPYRIGHT TILT MICRO 


10 COLOR3, 1 :CLS :GOSLIBS080 :G0SUB8208 132 PRINT8453, "DNI 


les éviter. Si l'une d'elles parvient à vous 
toucher, le rétroviseur s'illumine еп 
rouge. 


- Pour commencer, pressez un touche cla- 
vier. 

- Voici les différentes commandes : 

* Viragesà gauche A — 2 cases (grands vi- 
rages) 

Z — 1 case (petits virages) 

* Virages à droite K —2 cases 


M — 1 case 

* Tir = n'importe quelle autre touche al- 
phanumérique du clavier. 

- Enentrant le programme faites attention 
car les caractères semi-graphiques du lis- 
ting correspondent aux touches à presser 
sur le clavier. Le résultat graphique à l'é- 
cran est inversé. 

- Ce logiciel nécessite l'extension de 16 
Ko de mémoire vive. 


128 FORI-1TOZ-RÉ :PRINT@444-1, "о" ; :МЕХТ 


3 : COLOR? 


20 р=40 :5С=0 :ВЕ=6 : COLOR] :PRINT643?, "nono 140 РВІМТӨ257, " LS 


00"; 
25 PRINT@386, "READY" ; 
22 R$-]NKEY& 

30 IFINKETS=""THEN3Q 


40 SOUND2,9 


B 
152 РКІМТӨІЗ5," Get 
155 PRINT8103, " 25 
157 РЕІМТӨ202," "j 


100 FORTIME=-42900T08STEP-18*COLORI ‘PRINT 
9386, USING" 184" 5T IME ; 

105 PRINT"n"; 

118 COLOR4:PRINT8398, US ING"#H4" ;5С; :PRIN 
Tm"; 


160 IFñBS(ñ)<15THENGOSUB4000ELSEIFñBS(ñ) 
> 20THENGOSUB3000 

178 IFRNDC3)-3THENGOSLIB2008ELSEFORT-1T03 
@@:МЕХТ ° 

180 IFRNDC3)=3THENGOSUBS808 

190 К%-ІМКЕҮ% 


191 КЕП INDISPENSABLE POUR NETTOYER LE Т 
AMPON D*EHTREE 

200 IFINKEY$="ñ"THENñ=ñ+2;PRINT0453, " <" ; 
*GoTosoo 

210 IFINKEYS="2"THENA=A+1 :PRINT@453, "<"; 
:8070500 

220 IFINKEY$= 
"8070500 

230 ІҒІМКЕҮФ="М"ТНЕМА=А-1 :РЕІМТӨ457, ">"; 
:50Т0500 

240 IFINKEY$ <> ""THENGOSUB2088 

500 IFRNDC8)>2/LOGCSC+2)THENA=A+SGNCRNDC 
@)-.5)XRND(2) 

510 IFABSCA)>29THENGOSUB8008 

520 GOSUB1008 

600 IFRE>@THENNEXTTIME 

605 IFRE=@THENPRINT@437; "о" ; 

610 PRINT@235, "САМЕ OUER" ;:PRINT@261, "UN 
E AUTRE PARTIE ? (0-М)"; 

620 IFINKEYS <> "Y"ANDINKEY# © "N"THEN620 
630 ІҒІМКЕҮФ-"Ү"ТНЕМ10 

708 END 

1000 IFRNDC@) <2/LOG(SC+2)0RCABS CA) <22AND 
RNDCS) <> 5) THENRETURN 

1010 H=8-RND( 15) :IFABSCA)> 20THENH-29XSGN 
CA)-A 

1020 COLOR4:PRINT@143+H, "о" ; :COLOR2 

1030 FORI-1TO12STEP2:11-H*I:12-H-1 

1040 IFABSCI1)<7, THENPRINT@143+11, 
1050 IFABSC12) <?THENPRINT@142+12 
1060 NEXT:FORI=1TOD: IF INKEYS <>" 
Y$<>"K"THENNEXT :60T01500 

1020 ҒОК1-121015ТЕР-2:11-Нж1:12: 
1080 IFI1<BTHENPRINT@143+11," 
1090 ІҒІ22-ВТНЕМРКІМТӨ142%12," 
1100 NEXT :RETURN 

1500 FORI-2TOB8 :COLORI :SOUND1, 1 
1510 PRINT0103, "MENEEEEEEEEEEEER ` ; 
1520 PRINT8135, "MENEESNEEEEHEEEN ' ; 
1530 NEXT:RE=RE-1 :RETURN 


ТНЕМА-б-2:РКІМТӨ452,">"; 


2008 FORI=1TO12STEP2:PRINT@0256+1,"--" ; :P 
КІМТӨ285-1,"--";:МЕХТ 
2010 ҒОКІ-170125ТЕР2:РЕІМТӨ256%1," ";:Р 
RINTG285-I,"  "j:NEXT 


2020 IFñ=0THENGOSUB6000 :SC-SC.* 1 :GOSLIBBOO 
@ 

2030 RETURN 

3000 PRINT@143+29xkSGN(ñ)-ñ,"*";:RETURN 


4000 PRINT@271+A; "n" ; :ІҒА=ӘТНЕМРЕІМТӨ207 
QUE 

4010 RETURN 

Saad 1-271*C3-RNDC2)X2)XCRNDC12) 41) 

5010 PRINTGI, "о" ; RETURN 


SOUND4, 5 :COLOR4 :PRINT@221, "ш 


2002 C-3-RNDC2)X2:H-2125*32XRNDC2) :B$=CHR 
$CRNDC2)+41) 

7010 FORI=HTOH+14XCSTEP2XC:PRINT@I ; B$ ; 
7030 PRINT@I;" ";:NEXT 5 

2040 FORI-111*2XCTO111STEP-3XC :PRINTGI , " 


PRINT , " 
7060 RETURN 
8000 A=29-RND(69) :RETURN : 

9000 ҒОР1=289927029183 :РОКЕІ ,.128::NEXT 
9005 FORI-67T091 :PRINTGI;"g" 
9010 FORI-SSTO131STEP32 :FOR. 
9015 PRINTGI*J; " 3 !NEXT :МЕХТ 
9020 РРІМТӨ128, "шшш 

9030 FORI=1T029 :PRINT@I+160, "BI" ; :PRINTGI 
+288, "m"; 

9035 PRINT@I+352, "® 
EXT 

9040 FORI-1T010:PRINTG128*32XI, "m" ; :PRIN 
T@158+32X1 :NEXT 

9045 COLOR6:SOUND31,1 

9082 SOUND3Ə, 1 :COLOR3 

8090 FORI=324T0346STEP2:PRINT@I,"m";:SOU 
ND1, 1 : NEXT 

9105 PRINT@417, " 


"$ NEXT 


:PRINT0350-1I,"m'";:N 


; 
9118" PRINT8360, " "S :PRINTG392, " 


E 

9120 FORI=0T03 :PRINT932]*32XI 

9380132X1, "nn" ; :NEXT 

9130 FORI-1TO1000:NEXT d 

9140 РКІМТӨЗ54, "TIME" ; :PRINT8405, "123456 
i 

9150 FORI-0TO14 :FORJ-3TOISTEP-1 :PRINT@1? 

5*32XJ- 1; ; 

9155 PRINT0125+32kJ+I," ";:NEXT'NEXT 

9160 COLOR6:PRINT0123, "O00000" ; 

9120 COLORS :PRINTR270, "> PRINT0222, "<" 

i COLOR? 

9180 RETURN 


3:PRINT 
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Encore un casse-tête ! 
Celui-ci est inspiré du jeu de Taquin. 
Un bon conseil : gardez votre calme... 


ж L'ANE ROUGE 


clavier, Le résultat à l'écran est inversé. 
BOTIQURIEU AU GEAVIER Ce logiciel nécessite l'utilisation de l'ex- 
Vous devez passer de la configuration d€ ; Pour jouer, déplacez les pièces une à une tension 16 Ko de mémoire vive. 
départ à une configuration ou le grand ` en pressant la touche correspondant au | 
carré, la pièce numéro 9, se trouve еп bas numéro porté sur celle choisie. En entrant 
au centre. C'est-à-dire déplacez, une à |е programme, faites attention car les ca- 
une, les pièces composants la figure du гасіёгеѕ semi-graphiques du listing cor- 


jeu. ç respondent aux touches à presser sur le —ə— wx P - Ü MÜ ° —— —  ——— 
5 REH COPYRIGHT TILT MICRO [= 320 МЕХТ 
2 CLS:FORI=1T025 :СО ОК, 1 :POKE30744, I :PRI -400 IFJ(2,5)*96NDJC3, 5) -STHENPRINT8480, " 
NT8232,"L ANE ROUGE" BRAVO?" ; "END 
8 COLOR, 0 :NEXTI :COLOR; 0:CLS 410 PRINT6480, " 
19 CLS:DIMJC4, 5), C112, YC112), TC112, 0$(4) 415 FORI-1TOS0:R$-INKEYS :NEXT 
1DXC1),DYC1),FC1),PC1) 420 R$=INKEY$:IFR$< ORR$> "S"THEN420 
20 COLORQ, 1:Ғ081-0Т04805ТЕРЗ? 430 PRINT@480," ";:N-URLCRS) 
38 PRINT8 I , "O00000000000000000000000000 | 500 ҒОКІ=0Т01 :ҒОКЈ=2Т085ТЕР2 
0000" ; :NEXT 510 X=XC1+1@)+J-2-3XINTCCJ-12/3) 
40 ОАТАІ, 5,3, 1,1,2, 1,2,2 520 YsYCI*10)*INTCCJ-1273)-1 
41 П8Т64,5,3,1,3,2,1,4,2 530 IFØ<XANDX<5ANDØ<YANDY<6THENIFN=J (X, Y 
42 ОАТӢ1,3,1,1,5,0,2,1,3 )THENSSO 
43 DRT84,3,1,2,2,9,2,3,6 540 NEXTJ :X-XCI*102 :Y-YCI*10) 
44 DRT82,4,3,2,4,4,2,5,10 550 DX(I)=X(I+10)-X:DYC(I)=YC(I+10)-Y 
45 DAT63,4,3,3,1,9, 35298 560 NEXTI :T=TCN) 
46 DATA2,3,4,3,3,6,3,4,5 520 FY-2-SGNCT72- INTCT7222 :ЕХ=1, 5-SGNCT- 
42 DRT61,1,1,3,5; 11,4, 1, 8 2.5242 
48 DRT84,1,1,4,2,8, 4,3,3 588 FORI-OTO1:F(12)-8 
49 DATA2,1,2,4,4,3, 4,5, 1 590 IFDXCI)+DYC1) O ТНЕМЕСІ)=ЕХ:ІЕЮХСІ)= 
52 DhT062,5,0,1,1,2; 557 ӨТНЕНЕСІ2 ЕТ 
51 ОАТӢЗ,5,0,1,1,7,1,1,7 595 МЕХТ 
60 FORI=ØT011 :КЕАОХСІ), YCI2, TCI); X5 Y JCX 600 IFFCO)*FCI)-OTHENA410 
1Y); X,Y, JCX, Y) :INEXT 610 ҒОКІ=0Т01 :PC1)=0 
70- 0%(0)= "ЕМ HAUT  ":0$C1)-" ñ GAUCHE" :0 620 IFFCIJ-1THENPCIJ 
$(3)-" À DROITE" 638 IFF(I)=2ñNDF(1-I)=2ñNDDX(0)=DX(1]J)ñND 
80 Q$(4)="EN BAS " DYCO)-DYC1)THENPCIQ-2 
108 ҒОКІ-0Т09:С0-96ЖҮС12%4%Х(12-88 ` 642 NEXT 


209 B-128: IFTC I)» 2THENB-32 

21D Ре-"":1ЕТС12/2-ІМТСТС12/22ТНЕМР% 
220 FORJ=@TOBSTEPS32 :PRINT@J +C0, P$+ "суса" 
ï ‘NEXT 

230 IFP$4""THENPS- "maga" 

240 РКІМТӘС0%В%32,Р%% шиша” ; ‘POKE28705+C. 
9,48+1 

300 NEXT:FORI-IVTO11:CO-96XYCI)*4XXCI)-8 
8 


310 FORJ-OTOB4STEP32:PRINTGCO*J; "ашшы"; ` 
NEXT 
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290 IFP(0)+P(1)=@THEN410 
71@ IFP(0J)=20RP(0@)<>P(1)THEN800Q 
220 Q0-2*DX(0)*2XDYC0) :0122*DXC1) *2XDYC1 


a 


PRINT8384,0$(Q0) ; :10$-T1D$ G$ (G0), 4, 


PRINT@416," DU f 
РЕЇМТ@448,0$(01);:11$=1110$(0$(01),4› 


PRINT@480, "?" ; 


IF INKEYS<>MOSANDINKEYS < П1ТНЕМ?70 
R=8: [FINKEY$=M1$THENR=1 


790 PCR)=1:P(I-R)=0 


0000000" ; 


XDXCI) 


Vous jouez à deux. Le gagnant est celui 
qui atteind le premier une réserve de 
nourriture situé à droite de l'écran. Les 
phoques se déplacent d'une case sur la 
terre (zone blanche) et de cinq cases sur la 
mer verte si, bien sûr, aucun obstacle ne 
gêne leur progression. lls laissent derrière 


291 PRINT8384; 'ooooo0000" ; :PRINT8416, ‘oo 
792 PRINT6448, 'oooooo000" ; :PRINT6488," " 


800 FORI-OTÓl:IFPCI)O 1 THENNEXT :1=8 
818 FC(I)=FX+FY-FC(I):X(I+10)=X(1+10)-FC(I) 


820 YC(I*10)-YCI*10)-FCIOXDYCIO):JCXCI*102 


858 
860 


зде 50701002 


«ҮС1%1032-1%10 

830 IFPCIJ-2THENI-1 :P(1)71:G0T0819 

840 X(N)SXCNOTDXCIO:YCNIJSYCN)sDYCIO 
FTCN)>2THENB=@ 
ФЕТ(М)/2=1НТ(Т(М)/2)ТНЕМР=1 
870 FORX=X(NJTOXC(NJ)+P:FORY=Y(N)TOY(NJ)+B 
888 ЈСХ,Ү)=М:МЕХТ :МЕХТ 


LEPHOQUE 


eux une trace, qu'ils ne pourront franchir 
par la suite, sauf en pressant le bouton du 
joy stick. Néanmoins, au cours d'une par- 
tie, chaque joueur ne pourra utiliser la 
possibilité de jump plus de trois fois. 


Chaque joueur manipule un phoque à 
l'aide de son joy stick (8 directions - bou- 


Vous voici dans les mers Artiques, 
aux prises avec un phoque glouton. 
Le premier arrivé sera le premier servi. 


tori de feu). Le départ de chaque animal 
est à gauche, en haut et en bas de l'écran. 
Ce logiciel nécessite l'utilisation d'une ex- 
tesion manettes de jeu. 


5 REM COPYRIGHT TILT MICRO 

B CLS:FORIZ1TO15:PRINTG9232, "LE PHOQUE" :P 
0КЕЗ0744, I :NEXTI 

10 DIMXC12, YC12, $12,0XC102,0YC102, SDC12 
20 CLS:MODEC1):COLOR?, 1:1=,3 

30 ҒОКХ-0101265ТЕР2:ҒОВҮ-0Т0625ТЕР2:ІҒЕМ 
DC@)>.7THENGOSUB5000 

40 МЕХТ:МЕХТ:1-й 

50 X=88:Y=31 :GOSUB5000 :X-0 : Y-0 :GOSUB5220 
:Y=62 :G0SUB5000 

60 X(0)=0:Y(0)=8:X(1)=8:Y(1)=63:S(8)=3:S 
(12-73 

20 ОАТА1, 1,1,-1,1,8,9,9,-1,1,-1,-1,-1,8, 
9,9,0, 1,8, -1 

80 РОКІ=0Т09 :КЕАРОХСІ),0ҮСІ) :МЕХТ :SD(@)= 
0:SD(1)= 
9@ С01.0К6:5ЕТ(88,31):5Е7(0,2):5ЕТ(0,632 
102 FORI=@TO1 :0D=( INP(43+3XI JAND31 )-21:X 
-ХС12:Ү-ҮС1) 

110 IFOD<ØTHENIFSDC( I )=ØANDS( I )>ØTHENSD( I 
2-1:0070180Е1.5Е5070120 

115 COLORB:SETCX, Y) s 

120 D-0:FORJ-1T05:X-X*O0XCOD) : Y2 Y*OYCODJ 
130 1FX<GORX> 1270RY<GORY> 63THEND-1 :X-XCI 
J:YsYCIO 

140. IFPOINTCX; Y)=2THEND=1 

150 IFPOINTCX, Y)-868NDSDCI)-OTHEND-1 :X-XC 
I):Y=YCI) 


16@ IFD-OTHENNEXT 
165 ҒОК.)/-Х(1210Х-0Х(0025ТЕРОХ(002:5ЕТЕХС 


I3, YCI22 

167 X(IJ-XCIJ*0XCOD) :YCI2eYCI)4O0Y COD) :МЕ 
XT 

120 IFSDCIJE1THENSDCIQ-0:SCIJ-SCIO-1 
180 COLORG :SETCXC I ); YCI 2) :SOUND1; 1 :NEXT 
208 D-0:FORI-GTOI : IFXC1)=88ANDYC1)=31THE 
ND-D*1*1 

210 NEXT : IFD-OTHEN108 

220 SOUND1,5:IFD=3THENPRINT"EX-AEQUO" ; 
230 END 

5000 FORA=XTOX+1 :FORB=YTOY+] 


5010 IFRNDCG)> ITHENSETCA, B) 
5020 NEXT :NEXT :RE TURN 


TCHOUKA 


Aux prises avec des trous 
et des cailloux, à vous de démëler 
ce casse tëte infernal 


BUT DU JEU 


Le terrain de jeu se compose de quatre 
trous remplis de deux cailloux et de la 
Rouma (trou de droite, qui est vide au dé- 
part). Le but du jeu est de metre tous les 
cailloux dans la Rouma (affichage: 
0000 8). 

Trois cas peuvent se présenter ` 

1/ Le dernier caillou de la distribution 
aboutit dans la Rouma, l'affichage s'im- 


5 REMCOPYRIGHT TILT MICRO 
8 CLS 


10 CLS :PRINT *PRINT'NOMBRE DE 
UTA : IFA<4ORA> ЭТНЕМ10 
20 IFA/2>INTCA/2)THENA=A-1 


505082008 


225,LEFTSCPR$, 3XA) ; 
42 PRINT@42, "JEU DU TCHOUKA" 


1" ; :G0SUB3000 
110 IFINKEY$=""THEN110 
120 D$=INKEYS : 
EN1 18 


30 CLS:FORB=@TOA-1:A(B)=A/2:NEXT:ACA)=0: 


40 PRS=" 8 Fl EK) C3) E) [3 RG HID 
100 PRINT@352, "TROU DE DEPART? (1 -";A;" 


Suel CD$)-1 :1FD<90RD>ñ-1TH 


mobilise. Il faut alors recommencer une 
nouvelle distribution en partant d'un trou 
quelconque. 

2/ Le dernier caillou distribué tombe dans 
un trou déjà occupé, l'affichage clignote 
sur ce trou. Repartez alors obligatoire- 
ment de ce trou, en ramassant tout son 
contenu. 

3/ Le dernier caillou distribué tombe dans 
un trou vide autre que la Rouma. C'est l'é- 
chec, la partie est finie. 


AU CLAVIER 


- Choisissez le nombre de trous utilisés 
pour une partie. Lorsque le jeu demarre, 
prenez en main tous les cailloux du trou de 
votre choix. Puis pressez la touche corres- 
pondant au trou de départ. Distribuez-les, 
un à un dans les trous contigus y compris 
la Rouma en allant vers la droite. S'il en 
reste, continuez la distribution à partir du 


Г 
220 АС0)= 


TROUS" ; : INP 
Шы; 
255 
260 
270 
280 
208 
400 
410 
502 
Е"; 
519 


D$ 


A(D)+1 :60SUB2000 :NEXT 
230 1FD=ATHEN408 

240 ІҒА(П2-1ТНЕМ500 

250 PRINT@352, "DEPART IMPOSE";:PRINTG384 
POUR CONTINUER" ; 

GOSLIB3000 

605085000 : IF INKEY$ < "C" THEN260 
":РРІМТӨЗ52," Ps 
PRINTe384, " 


IFACA) X» AXA/2THEN108 
РЕІМТӨЗ52, "GAGNE : " ;P$ ; :END 
PRINT8352,"LE TROU D'ARRIVEE EST UID 


PRINT@384, "PERDU: " ;P$ ; :END 
2000 FORB-OTOR:PRINTG193*3XB, ACB) ; :МЕХТ 


trou n? 1. 


E 
"%:50Т0 


2010 PRINT@192+3XA; ">" ; :RETURN 

3000 ҒОКЧ-17050:0%-ІМКЕҮ%:МЕХТ:КЕТИЕМ 
ҒОКВ-1705:0050И85000 :NEXT :RETURN 
8864+3XK:FORI=1T03 :РОКЕКІ +1 , PEE 
KCK1*12-64 :NEXT 

5818 FORJ-1TO80:NEXT 

5020 PRINTG193:3XK; ACK) ; :FORJ-1T0100 :NEX 
1 

5038 RETURN 


130 РКІМТӨЗ52," 


140 РКІМТӨЗ84, " Н 

15@ IFACD)=OTHENPRINT@384, "CE TROU EST v 
IDE" ; :GOTO100 

200 P$=P$+D$ :GOSUB4009"*E=A(D) :АС0)=0 :GOS 


ив2@@@ 
210 FORC=1 TOE :D=D-A+CA+1)XSGNCA-D) :GOSUB 
4000 
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GOURMAND 


Un glouton s'est introduit 
dans votre champ de glace à la fraise. 
A vous de limiter les dégâts de ce vorace 
trop indiscipliné. 


BUT DU JEU vous falloir du doigté et de la précision... désiré, utilisez les flèches. 
Surtout pour l'y maintenir enfermer. - Pour enfermer le gourmand dans sa 


Votre mission consiste à prendre le gour- Ч boîte, validez avec la barre «espace». 
mand en charge dans le but de le conduire [ AU CLAVIER =] P ids 
Мегѕ sa petite boite rouge. Croyez-moiilva - Pour accélérer ou ralentir dans le sens 

100 CODE 00 00 00 00 00 01 03 07 OF OF 00 00 1 


101 CODE 00 00 00 00 00 20 30 38 3C 3C 00 00 
102 CODE OF OF 07 07 03 03 03 01 01 01 00 00 
103 CODE ЗС 3C 38 38 30 30 30 20 20 20 00 00 
104 CODE 01 03 07 ІҒ 05 07 04 03 ОҒ 1Е 00 00 
105 CODE 20 30 38 ЗЕ 28 38 18 30 3C 1Е 00 00 
106 CODE ЗЕ ЗЕ ЗЕ 2F 2F ОҒ ОҒ 06 06 1E 00 00 
107 CODE ЗҒ IF ЗЕ 1D ЗО ЗС ЗС 18 18 1E 00 00 
108 PROC INIT 

109 REPEAT 

110 PROC GL 

111 PROTECT 6 

112 REPEAT 


113 PROC W 
114 PRINT 8 107,101;CHR$(24) ; T; CHR$C32) ; CHR$ (25) ; 
115 IF T2399 THEN LET 2-1 


116 UNTIL 2-1 

117 PROTECT 0 

118 PROC AR 

119 UNTIL NOTLEFT#CR$, 1)="0" 
120 CLS 

121 END 

122 DEFPROC INIT 

123 PROTECT 0 

124 VDU 1,6,2,1,4 


125 PRINT 8 40,30;CHR$(24) ;"LE GOURMAND" :СНКФ С 25) ; 

126 PRINT 8 10,130; "0оџѕ devez guider le gourmand vers "; 
127 PRINT 8 10,150;"l'endroit delimite par le cadre rouge"; 
128 PRINT е 10,170;"Il faut traverser un champ de glaces"; 
129 PRINT 8 10,190;"a la fraise qui attirent irresis-"; 

130 PRINT 8 10,210;"tiblement le gourmand."; 

131 LET G-GETN 

132 CLS 


133 PRINT @ 10,40;"Uous augmentez ou diminuez la vitesse"; 
134 PRINT е 10,40;"еп utilisant les 4 fleches du clavier."; 


135 PRINT @ 10,80;"Vous validez son arrivee avec la"; 

136 PRINT @ 10,100;"barre d'espace."; 

137 PRINT @ 10,120;"Attention le gourmand rebondit sur"; 

138 PRINT е 10,140;"certains cotes et ralentit apres"; 

13? PRINT @ 10,160;"avoir mange une glace."; 

140 PRINT е 10,180;"Le temps jolie contre vous den l» 
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141 LET б=бЕТМ 

142 LET X=80,Y=11,T=0,t=2,v=0,w=0,Z=0,B=0,N=8,S=0 
143 DIM X(N) ,YCND , GEN) 

144 ОРОКЕ GRAPHIC, LCTN¢ 100) 

145 FOR I-1 TO 11 

146 READ А 

147 LET G$-G$*CHR$COD 

148 NEXT I 

149 FOR 1=1 TO ? 

150 READ À 

151 LET B$=B$+CHR$(A) 

152 NEXT 1 

153 FOR 1=1 TO 7 

154 READ À 

155 LET E$=E$+CHR$(A) 

156 NEXT 1 

157 DATA 1,2,128,130,22,22,10,1,4,132,134,1,2,136,138,22,22,10,140,142,32,32,22, 
22,10,32,32 

158 ENDPROC 

159 DEFPROC GL 

140 LET Х-80,Ү-11,Т-0,5-0,у-0,м-0,2-0 
161 CLS 

142 INK 0 

163 MOVE 39,9 

144 DRAW 232,9 

145 DRAW 232,201 

156 DRAW 39,201 

167 DRAW 39,9 

168 INK GREEN 

169 FOR I=1 TO N 3 

170 LET XC1)=RAND( 150) +45 

171 LET YCI)=RAND( 150) +11 

172 (ЕТ Q(1)=-RAND(6)-1 

173 PRINT е X(1)X0.5,Y<1) :CHR# (21) +G$+CHR$( 20) ; 
174 NEXT 1 

175 VDU 21,1,3 

176 MOVE 200,200 

177 DRAW 200,148 

178 DRAW 231,168 

179 VDU 20 

180 PRINT е 20,101;CHR$(24) ;"Record ";B;" "; 
181 PRINT 8 100,101;"T ";CHR$(25) ; 

182 ENDPROC 

183 DEFPROC МУ 

184 LET T=T+1,E=0,F=0 

185 FOR I=1 TO N 

186 LET V-XCD -X, We YCD -Y 

187 LET C=UXU+WXW 

188 IF С<6 THEN LET C-é,v-vX0.5,w-0.5 
189 IF C=é THEN BEEP 100,200,63 


190 (1) XU/C 
191 CI) XW/C 
192 LET E=E-ë,F=F-f 
193 NEXT I 


194 IF KEYN=32 THEN LET 2=1 ü 
195 LET v-v*CINPC&0980) 2223) -(INP(&0980) =251) 
194 LET w=w+ ( INP(&0080)=223) -CINP(&0080)=239) 
197 LET v=v+EXt,x=X+vXt 

198 LET u=w+FXt,y=Y+wXt 

199 PRINT 8 XX0.5,Y;E$; 

200 LET X=x,Y=y 

201 IF X>220 THEN LET X=40 

202 ELSE IF X440 THEN LET X=40 

203 IF Ү2180 THEN LET Y-10 

204 ELSE IF Y<10 THEN LET Y-10 

205 PRINT 8 XX0.5,Y;B$; 


206 ENDPROC 
u. 
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207 DEFPROC AR 

208 LET S=INT{XXY/T) 

209 IF T>3?? OR (XC200 OR Ү<168) THEN LET S=0 

210 PRINT 8 60,101;CHR$(24) ; "SCORE ";S;CHR$C25) ; 

211 PRINT 8 40,235;"Un autre essai"; 

212 INPUT R$ 

213 IF NOTLEFT$ (R$, 1) ="0" THEN  ENDPROC 

214 IF B<S THEN LET В-5 

215 ENDPROC п 


MOUTONS 


% 
% 


Vétérinaire, vous devez 
juguler l'épidémie qui décime 
les troupeaux de moutons 
de la région 


2 4% ТЕЛ)! > 

BUT DU JEU leur) afin de les guérir. horizontales et verticales puis vaccinez 
avec la touche «Return». 

A l'aide de votre seringue, vaccinez les С AU CLAVIER | 

moutons malades (qui changent de cou- - Déplacez la seringue à l'aide desfleches „ысы а 


100 CODE 00 03 ОЕ ЗЕ 2F OF 07 02 02 02 00 00 
110 CODE 00 ЗЕ ЗЕ ЗЕ ЗЕ ЗЕ ЗЕ 00 00 00 00 00 
120 CODE 00 00 ЗС ЗЕ 3E 36 20 20 20 20 00 00 
130 CODE ОЕ 04 04 0а OA ОА OA OE 04 04 
140 REM -MOUTONS- 1984 
150 DIM M(79) 
160 LET hz18,v-10,N-18,L-1,G-0 
170 PROTECT 0 
180 UDU 1,0,2,4,4 
190 ОРОКЕ GRAPHIC,LCTN(100) 
200 LET A$=CHR$( 128) +CHR# 130) * CHR$C 132) , B$=CHR$( 1) +CHR$( 2) «CHR 134) 
210 REPEAT 
220 PROC MOUTONS 
230 PROC PR 
240 LET H-18,U-10,C--1,9-0,T-0 
250 VDU 1,0,2,4 
260 PRINT 8 2,2;CHR$(24) ;L;CHR$(25) ; 
270 ‘REPEAT 


280 PROC MAL 
290 LET D=INP(&0980) ,E=INP(&0080) 
300 LET H=H+((D=223) -(D=251)) X12,V=U+((E=223) -(E=239) ) X20 
310 IF V>211 THEN LET V=10 

320 ELSE IF V<9 THEN LET У-210 
330 IF H>114 THEN LET Н-4 

340 ELSE IF H<é THEN LET H-114 
350 IF D=247 THEN PROC VACCIN 
360 PRINT е һ,м;" "; 

370 PRINT @ H,U;B$; 

380 LET bech, séch 


390 UNTIL S+T>65 


400 LET N-N-2,L-L*1 
410 BEEP 100,500,50 
L 420 LET б-0%5 » 
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TENET] 


F 430 


440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 
550 
560 
570 
580 
590 
600 
610 
620 
630 
640 
650 
660 
670 
680 
690 
700 
710 
720 
730 
740 
750 
760 
770 
780 
790 
800 
810 
820 
830 
840 
850 
860 
870 


PAUSE 10000 
UNTIL 153 
PRINT @ 20,220;"SCORE FINAL :";Q;" VACCINES"; 
LET 1=бЕТМ 
END 
DEFPROC VACCIN 
LET-Je(H-15) DIU 12«8X((U-10) DIV 20) 
IF Ј<0 OR J279 THEN  ENDPROC 
IF M(J)<2 OR MGD27 THEN ENDPROC 
LET M(J)=0,S=S+1 
INK 7+RAND( 2) 
PRINT 8 15+(J MOD 8)X12,20X(CJ DIU 8)+1) ;аФ; 
PRINT 8 49,240;CHR$< 1) +СНЕФС2) ; S; 
ENDPROC 
DEFPROC MAL 
LET C=(C+1) MOD 80 
LET X=15+(C MOD 8) X12,Y-20X((C DIV 8)+1› 
IF M(C)21 THEN LET M(C)=M(C)+1 
IF M(C)=1 THEN LET MCC)=1+CRAND(20) DIU ND 
IF МСС)<22 THEN GOTO LABEL А 
INK MAGENTA 
PRINT 8 X,Y;6$; 
LABEL À 
IF M(C)428 THEN ЕМОРКОС 
PRINT 8 X,Y;" ` "y 
LET T=T+1 
PRINT 8 97,240;CHR$(C1) *CHR$C2) jT; 
ENDPROC 
DEFPROC PR 
VDU 1,5,2,1 
FOR 1-230 TO 240 STEP 10 
PRINT е 0,I;CHR$(30) ; 


NEXT 1 

PRINT 8 2,115;CHR$(24) ; "EPIDEMIE" ; CHR$C25) ; 
PRINT 8 40,230;"UACCINES MORTS"; 
PRINT @ 46,240;CHR$(2) +CHR#(4) ;" "3 
PRINT @ 94,240;CHR$(2) +CHR%( 4) з" H 
ЕМОРЕОС 


DEFPR0C MOUTONS 

FOR J=0 ТО 7? 
INK 7+RAND( 2) 
LET M(J)=1,X=15+(J MOD 8)X12,Y=20X((J DIV 8)+1) 
PRINT е X,Y;6$; 

NEXT J 

ENDPROC 
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BEYROUTH 


Vous volez en rase mottes au-dessus de Beyrouth. 
Ce n'est pas très légal certes, 
mais nous fermons les yeux. Par contre, ouvrez grands les vôtres 
et prenez garde à votre ombre car celle-ci 
peut vous trahir. 


au prix d'une consommation de carburant Pour monter temporairement au niveau 
ВОЕВОДЕ effarante. de sécurité (niveau de vol 2) utilisez la 
А bord de votre coucou, rasez au plus près AU CLAVIER flèche 


les immeubles. Évitez les plus élevés, si- 
non... Vous aurez la ressource de monter Pour les déplacements, utilisez les flèches 


à un niveau où la sécurité est totale, mais — — 


Е 100 

110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
son 


CODE 01 8é 0С ED 41 ЗЕ 00 D3 87 04 ED 41 ЗЕ 00 D3 87 C? 
CODE 00 00 00 00 00 00 07 OF OF OF 00 00 
CODE 00 01 03 03 03 03 ЗЕ ЗЕ ЗЕ ЗЕ 00 00 
CODE 00 00 20 20 20 20 ЗЕ ЗЕ ЗЕ ЗЕ 00 00 
CODE 00 00 00 00 00 00 30 38 38 38 00 00 
CODE 03 03 03 03 1F ЗЕ 00 00 00 00 00 00 
CODE 20 20 20 20 3C 3E 00 00 00 00 00 00 
CODE 00 00 00 00 00 00 00 07 OF OF 00 00 
CODE 00 00 00 00 OC OC OC ЗЕ ЗЕ ЗЕ 00 00 
CODE 00 00 00 00 00 00 00 38 3C 3C 00 00 
CODE 0С 0С 0С OC ЗЕ ЗЕ 00 00 00 оо 00 00 
CODE FF FF FF FF FF FF FF FF FF FF 00 00 
PROC INIT 
FOR N-0 TO 3 
WINDOW 3,123,0,255 
FOR 1=0 TO. 63 
LET Р<1) =0 
МЕХТ І 
ССНАК 62094 
ОРОКЕ GRAPHIC,LCTN( 110) 
LABEL ñ 
CLS 
PRINT @ 20,50; 
INPUT "Quantite de carburant <<500)";F 
IF Ғ>500 THEN GOTO LABEL А 
PROTECT 0 
PAPER BLACK 
CLS 
PROTECT CYAN 
REPEAT 
PROC GC 
LET D=(D-2) MOD 64 
LET z-D DIV 8,2-(D-8Xz) X32 
POKE L*ó,z 
POKE L*13,2 
LET V=CINP(&0080)=239) 
LET F-F-1-5XU,d-d*1,Y-DX4-C 
IF V-0 THEN LET А%=В% 
ELSE LET A$=C$ 
LET X=X+3X(INP(&0980)=223) -3% ( INP (40980) =25 1) 
IF X<é THEN LET X=é 
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З mm 
510 ELSE IF Х2110 THEN -T X=110 


520 PRINT @ х,у;ЕФ; 

530 CALL L 

540 PRINT е X,Y;6$; 

550 LET M=(D-C/4) MOD 64 S 

560 IF (X>P(M)-8 AND X<P(M) +6) ОК Ғ<-0 THEN PROC CO 
570 LET x=X,y=Y 

580 UNTIL F<=0 

590 NEXT N 

600 


END 
&10 DEFPROC INIT 
620 PROTECT 0 
630 DIM 0%(15) ,В%( 12) ,С%(15) ,0%(10) ,Р%(9) ,0%( 10) ,Р(63) 
640 LET L=LCTN( 100) ,D=0 ,C=80 ,X=é0 ,d=0 ,x=X ,y=C ,s=0 , 5=0 
650 VDU 2,1,1,7,4 
660 FOR 1=0 TO 14 
670 READ А 
680 LET C$-C$*CHR$CA) 
690 NEXT I 
700 FOR 1=0 TO 11 
710 READ À 
720 LET B$=B$+CHR$(A) 
730 NEXT I 
740 FOR 1-0 TO 9 
750 READ À 
760 LET G$-G$*CHR$(CA) 
770 NEXT I 
780 FOR 1-0 TO 8 
790 READ À 
800 LET P$-P$*CHR$(CA) 
810 NEXT I 
820 LET E$-CHR$(32) *CHR$(32) 
830 LET F$=E$+E%,E$=F$+CHR$ (22) * CHR$(22) +CHR# (22) +CHR$( 10) *E$ 
840 DATA 1,2,128,130,132,134,22,22,22,22,10,32,134,138,32 
850 DATA 1,2,140,142,144,22,22,22,10,32,146,32 
860 DATA 1,5,148,148,21,1,1,148,148,20 
870 DATA 1,5,148,148,21,1,1,148,20 
880 ENDPROC 
890 DEFPROC GC 
900 PROTECT RED 
910 PRINT 8 P(D),DX4;" "J 
920 LET P(D)=RAND( 110) , R=RAND( 3) 
930 IF R=0 THEN LET A$=P$ 
940 ELSE LET АФ-б% 
950 PRINT 8 P(D),DX4;6$; 
950 LFT P(D* D = 
970 PROTECT CYAN 
980 ENDPROC 
990 DEFPROC СО 
1000 IF F<=0 THEN GOTO LABEL С 
1010 IF V=i THEN  ENDPROC 
1020 IF P¢M+1)=0 THEN GOTO LABEL B 
1030 LABEL С 
1040 FOR I-5000 TO 5200 
1050 SOUND 1,20 A 
1060 NEXT I 
1070 PROC FIN 
1080 ENDPROC 
1090 LABEL E 
1100 LET F=F+10 
1110 IF F>1000 THEN LET F=1000 
1120 ENDPROC 
1130 DEFPROC FIN 
1140 PROTECT 0 
1150 VDU 2,1,4 
1160 POKE L+13,0 
1170 POKE L+é,0 
1180 CALL L 
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1190 PRINT @ 30,20;"Fuel ";F;" Score ";d; 
1200 PRINT е 30,40;"Dernier score "js; 
1210 LET s-d,F-0 

1220 IF SCd THEN SWAP S,d 

1230 PRINT @ 30,60;"Meilleur score WEI 
1240 PAUSE 30000 


1250 ENDPROC 


C'est le printemps ! 
Les papillons virevoltent de fleur en fleur. 
On se sent des ailes et le nectar vous chatouille les antennes. 
Mais dans ce paradis terrestre 
le monstre est à l'affût. 


BUT DU JEU vent annoncés par un bip sonore, ils ris- — tastrophe. 
quent de vous déporter et de vous faire - Appuyez sur la barre «espace» pour vous 


Il faut vous poser sur une des fleurs, en ` courir de grands dangers. poser sur une fleur. 


évitant de vous faire avaler par le camé- 
léon qui, en dépit de sa discrétion, est 


AU CLAVIER 


nanti d'une langue fort dangereuse. - Dirigez le papillon avec les touches— — 


Faites également attention aux coups de - Actionnez «Return» pour remonter en ca- 


100 
101 
102 
103 
104 
105 
106 
107 
108 
109 
110 
111 
112 
113 
114 
115 
116 
117 
118 


119 
120 
121 
122 
123 
124 
125 
126 
127 
128 
129 


130 NEXT I » 


50) *CHR$( 152) 


CODE 00 00 07 OF OF OF 07 03 03 00 00 09 

CODE 00 ЗЕ ЗЕ ЗЕ ЗЕ ЗЕ ЗЕ ЭЕ 2F OF 00 00 

CODE 00 20 20 30 38 3C 3C 38 20 00 00 00 

CODE 00 03 03 OF 1B 37 2F 3D 1F 06 00 00 

CODE 00 2B 2В ЗЕ ЗЕ ЗЕ ЗЕ 2B 0? 00 00 00 

CODE 00 20 20 38 2C 36 3B 1E 3C 30 00 00 

CODE 00 00 00 06 OE OF 06 03 00 00 00 00 

CODE 00 OE ЗЕ ЗЕ ЗЕ 1C 1? ЗЕ 08 08 00 00 

CODE 00 00 00 08 18 30 20 00 00 00 00 00 

CODE 03 OF 17 17 1F ЗЕ 07 OF OF OF 00 00 

CODE 00 20 10 10 38 ЗС 00 2F 29 25 00 00 

CODE IF IF IF 1F ЗЕ ЗЕ ЗЕ ІР OF 07 00 00 

CODE 31 31 31 31 39 39 3? 21 22 3C 00 00 

PROTECT 0 

ОРОКЕ GRAPHIC, LCTN( 1002 

LET B$=CHR$( 1) +CHR$( é) +CHR$( 134) +СНЕФ 136) +СНЕФ 138) 
LET Р%=СНЕ%‹ 1) %СНК%(5) «СНКФХ 128) *CHR$C 130) +CHR$¿( 132) 
LET F$=CHR%<( 1) *CHR$C7) +CHR$%( 140) +СНЕФ 142) +СНЕФ 144) 
LET C$=CHR$( 1) +СНКФ СЗ) +CHR%( 146) +CHR$( 148) +CHR$<( 22) +CHR$< 22) +CHR$( 10) +CHR$( 1 


LET ES$-CHR$(32) %СНКФ% 32) +CHR$ (22) +CHR$ 22) +СНЕФ 10) +CHR$¿( 32) & CHR$C32) 
LET R=5,e=0 
VDU 1,0,2,1,4 
PROC PRES 
REPEAT 
LET e=e+1 
PRINT @ 50,110;CHR$(24) ;"essai ";e;CHR$(25); 
LET X=é5,H=10,x=X,h=H,d=5,F=TRUE,1=S5,m=1 , a=0 ,b=0 ,M=0 ,U-0 
VDU 21 
FOR I-0 TO 10 
PRINT е 10+RANDC 100) ,5+ÇCRAND(3) ХІ) ;РФ; 
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1З1 VDU 20 


132 INK 4 

133 FOR 1=0 TO 4 

134 MOVE 3,205*I 

135 DRAW 255,205+1 

186,,, NEXT I 

137 — INK 1 

1383 FOR 1=0 TO 2 

139 PRINT 8 40*20XI,198; CHR$C21) *F$* CHR$C20) ; 


140 NEXT I 
141 REPEAT 


142 PROTECT 4 

143 PROTECT 4 

144 LET A=RAND< 12) 

145 IF Өзі THEN PROC VENT 

146 LET D-INP(&0980) ,E2INP(&0080? 


147 LET + ( (D=223) -(D=25 1) ) X4* ( RAND ( 4) -2) 
148 LET H=H+d-(E=239) X7 

149 IF D=247 THEN LET H=H-20 

150 PRINT 8 x,h;CHR$(32) *CHR$(32) +CHR$< 32) ; 
151 IF X>=108 THEN LET X=4 

152 IF X<=0 THEN LET Х-4 

158 PRINT 8 X,H;B$; 

154 PRINT 8 m,185;E$; 

155 IF 12110 THEN LET 1-5 

152 PRINT 8 1,185;C%; 

157 PROC LG 

158 LET те! 


159 LET h=H,x=X,1=1+5 

160 IF H>195 THEN LET F=FALSE 

161 IF KEYN-32 THEN LET F-FALSE 

162 UNTIL F-FALSE 

163 PAUSE 20000 

164 PROC FIN 

165 PRINT @ 3,230; 

166 UNTIL e-R 

167 END 

168 DEFPROC FIN 

167 PROTECT 0 

170 CLS 

171 IF M=i THEN PRINT 8 20,60;"Le cameleon а mange le papillon"; 
172 IF M=i THEN GOTO LABEL B 

173 IF Н<200 AND H> 190 AND X MOD 20>=0 AND X MOD 20<19 THEN GOTO LABEL À 
174 PRINT 8 20,60;"Le pauvre papillon n’a pas "; 
175 PRINT 8 20,80;"reussi a se poser sur la fleur." 
176 GOTO LABEL B 

177 LABEL À 

178 PRINT 8 20,100;"BRAVO LE PAPILLON S'EST BIEN POSE "; 
17? LABEL B 

180 PAUSE 30000 

181 CLS 

182 ENDPROC 

183 DEFPROC VENT 

184 ВЕЕР 50,1000,63 

185 PRINT 8 X;H;CHR$( 32) * CHR$(32) *CHR$C32) ; 

186 IF X>60 THEN LET X=X+10+(RAND(10)+1) 

187 ELSE LET X=X-10-CRAND( 10) + 1) 

188 IF Х>108 THEN LET X-4 

189 IF Х<4 THEN LET X-X*80 

190 ENDPROC 

191 DEFPROC PRES 

192 VDU 24 

193 INK 6 

194 PRINT е 40,30 ;"PAPILLON" ; 

195 VDU 25 

195 PRINT е 30,28;B$; 


197 PRINT 8 60,80;B#; 
198 PRINT @ 10,110;"Vous devez poser le papillon sur une"; 
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199 
200 
201 
202 
203 
204 
TD 
205 
206 
207 
208 
209 
210 
211 
212 
213 
214 
215 
216 
217 
218 
219 
220 
221 


© 


BUT DU JEU 


PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
et"; 

PRINT 
PRINT 
PRINT 
PRINT 


CLS 


PAAD гә г) ELE) 


ENDPROC 
DEFPROC LG 
LET a=1X2+5,b=XX2,U=100 
MOVE а, 185 
DRAW a, V 


INK 1 


MOVE а,у 
DRAW а, 185 


INK é 


10,120; "еѕ fleurs.I] est guette раг un сате-" ; 


10,130; "1еоп a vous d'eviter sa langue."; 
10,140; "Еп tapant sur RETURN,le papillon"; 
10,150; "гетопёе rapidement."; 


10,160;"I1 faut lutter contre le vent."; 


10,170;"Pour le deplacement utiliser: ";СНЕФ‹ 123) *CHR$(32) +СНЕФ 124 


10,180;"pour ralentir la descente :" ;СНЕФ‹ 125) ; 


10,190;"Quand le papillon est pose taper"; 


10,200;"sur la barre d'espace"; 


10,220;"Taper sur le clavier pour jouer"; 
LET G-GETN 


IF a=b АМО a<=b+18 AND VH THEN LET F-FALSE,M-1 
ENDPROC 


222 PRINT @ m,195;CHR$(32) ; 


Choisissez votre distance et entrainez- 
vous sérieusement. Vos temps sont enre- 


r 


LES FOLLES HAIES 


Bientôt les Jeux Olympiques. 
Avant d'affronter les plus grands athlètes, 
entraînez-vous. Votre stage de mise en condition 
commence avec le saut de haies. 


gistrés, il faudra jouer contre la montre ! — Pour ralentir appuyez sur — 


Pour accélérer appuyez sur — 


AU CLAVIER 


— Pour sauter, appuyez sur «Return» 


—_————————— 


100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
240 
270 


CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
DPOKE 


PRINT 
PRINT 
PRINT 
PRINT 
PRINT 


00 
00 
01 
30 
00 
38 
00 
38 
00 


01 
30 
01 
30 
00 
38 
00 
3C 
00 


01 
30 
oi 
38 
00 
1A 
00 
ЗЕ 
00 


00 
30 
03 
3c 


00 
20 
07 
DE 
00 
за 
01 
21 
00 


GRAPHIC ,&0 1D4 
PROTECT 0 
VDU 1,4,2,1,4 
LET X=10,Y=90 ,x=X,S=0 , d=0 ,U22, T-0 ,A=0 ,C-0 


е 40,15;CHR$( 24) ;"COURSE DE HAIES";CHR$(25) ; 
10,80;"Pour sauter les haies tapez sur"; 

10,100;"RETURN,si vous voulez accelerer"; 
8 10,120;"ou ralentir utilisez les fleches"; 


е 


оз 
зв 
3c 
06 
01 
ЗЕ 
01 
02 
00 


07 
38 
20 
02 
02 
38 
02 
04 
00 


05 
38 
00 
02 
04 
38 
02 
08 
00 


05 
38 
00 
02 
08 
38 
04 
04 
00 


10,140;"horizontales."; 


05 
3F 
00 
03 
00 
38 
06 
00 
00 


00 
00 
00 
00 
00 
00 
00 
00 


00 
00 
00 
00 
00 
00 
00 
00 


a < H 
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[ 280 PRINT 8 10,220;"Тарег sur le clavier pour jouer"; 
290 LET G-GETN 

300 FOR I-0 TO 40 STEP 20 

310 PRINT 8 10,80+1;СНЕФ 30) ; 

320 NEXT I 

330 PRINT @ 10,220 ;СНЕФ‹З0) ; 

340 FOR J-0 TO 3 

350 FOR I=0 TO 8XJXJ 

360 PRINT е RAND( 125) ,Y+JX 10 ;CHR%< 248) ; 

370 NEXT 1 

380 NEXT J 

390 INK 7 

400 MOVE 3,131 

410 DRAW 255,131 

420 FOR І-0 ТО 100 STEP 20 

430 PRINT 8 10+1,64;CHR#(24) *CHR$C73) +CHR%( 25) ; 

440 NEXT 1 

450 MOVE 3,143 

460 DRAW 255,143 

470 LET Y=?0 

480 FOR J=0 TO 3 

490 LET X-40*20XJ 

500 VDU 1,2,2,1,24 

510 PRINT @ X,Y;CHR#(73) ; 

520 VDU 25 

530 NEXT J 

540 LABEL D 

550 PRINT @ 3,220;"Distance choisie (multiple de 100)"; 

560 INPUT L 

570 PRINT Ө 3,220 ;CHR#&(30) ; 

580 IF (L MOD 100) <>0 THEN GOTO LABEL D 

590 ОРОКЕ GRAPHIC,LCTN( 100) 

600 LET X=4,Y=176 

610 LET C#=CHR#< 1282 *CHR$( 130) +СНКФ (22) +CHR#(22) +CHR#&C 10) +СНЕФ 132) +CHR$( 134) , DE 

=CHR#( 136) *CHR$(138) +CHR$ (22) +CHR# (22) *CHR$C10) +CHR$( 140) +СНЕФС 142) 

620 LET E$=CHR%< 144) +CHR#( 144) +CHR$( 22) +СНЕФ 22) +CHR#C 10) +CHR#C 144) +CHR#( 144) 

630 PROTECT 2 

640 INK 7 

650 REPEAT 

660 ШЕТ T=T+1 

670 LET D=INP(&0?80) 

680 LET V=U+(D=223) -(D=251) ,X=X+U 

690 IF X>114 THEN PROC EC 

700 IF D=247 THEN PROC SAUT 

710 PRINT 8 х,Ү;Е%; 

720 PRINT, х,Ү;С%; 

730 PAUSE 1000 

740 PRINT X,Y;E$; 

750 PRINT 8 X*U,Y;D$; 

760 LET x=X+V 

770 UNTIL d-L 

780 IF del THEN PRINT е X*U,Y;E$; 

790-1Ғ d=L THEN PAUSE 20000 

800 PROTECT 0 

810 VDU 1,7,2,1,4 


820 PRINT е 40,5;CHR$(24) ; "RESULTATS" ; CHR$C25) ; 

830 PRINT @ 10,60;"Vous avez couru "jL;" metres en"; 

840 PRINT @ 40,70;M;" mn ";m;" s"; 

850 PRINT 8 10,80;"Vous avez saute ";0.1Х5;" haies sur ";0.04Xd; 
860 PRINT 8 10,90;"Moyenne par tour: ";INT(T/(0.01Xd)) ; СНЕФС 32) у "е"; 
870 PRINT 6 3,230,""; 

880 PROTECT 0 

890 END 


900 DEFPROC SAUT 

910 PRINT 8 X,Y;E$; 

920 LET X=X+5,Y: 22,T=T+1 
930 IF X>117 THEN LET X=4 


940 PRINT @ Х,Ү;С%; 
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у” 


| 


950 LET A=(X-5) MOD 20 

960 IF А<18 AND А212 THEN LET S=S+10 

970 PRINT 8 X,Y;E$; 

980 LET X=X+5,Y=Y+22 

990 IF Х>117 THEN LET X=4 

1000 PRINT е X,Y;D$; 

1010 IF X MOD 20<-2 OR X MOD 202=17 THEN ВЕЕР 100,200,63 
1020 ENDPROC 

1030 DEFPROC EC 

1040 PRINT @ X,Y;E$; 

1050 LET X=4,d=d+ 100 

1060 PRINT е 8,20 ;CHR$(C24) ;d;" т" ;CHR%$( 25) ; 
1070 PRINT е 3,220; "5СОКЕ:";5; 

1080 LET M=T DIV 60,m=T MOD 60 

1090 PRINT 8 40,220;"TEMPS: ";M;" mn "; 
1100 PRINT е 80,220;m;" s "j 

1110 ENDPROC 

1120 NEXT I 

1130 NEXT J 

1140 ENDPROC 


lid Mc utc Meter cnc] 
LIGHT TRACK 


Vous prenez les commandes d'un vaisseau spatial 
trés étrange. En effet, son réacteur 
laisse derriére lui une trainée de fumée radio-active. 
DEEP SS т 


tale au maladroit. Vos réflexes seront-ils 
BUT DU JEU assez rapides ? 
Vous pourrez jouer soit seul contre l'ordi- 
nateur, soit contre un adversaire humain. АШОНАУЕВ 


Le but du jeu est simple, vous devez, le - Ce jeu se commande au clavier - * S = gauche 
plus rapidement possible, encercler votre - Avec deux joueurs ` joueur de droite ` - Avec un joueur contre l'ordinateur, il 
adversaire en évitant la trace du joueur * L = haut faut prendre les commandes de gauche 


concurrent, les cercles à l'écran et les li- 
mites du jeu. Mais attention ! La première 
collision de l'un ou de l'autre joueur est fa- 


9 КЕМ COPYRIGHT TILT-MICRO 


bas À ( A.Z.D.S ). 
gauche 
droite 


THEN J=@ 


2 J=-1:Q=1 ' THEN Q 

3 POKE 618,10 " THEN J=@:K=1 

S GOSUB 400 BO X1=X1+J:Y1=Y1+K 

1@ X1=110:Y1=100:X2=130:Y2=Y1 82 IF POINT(X1,Y1)=-1  THENC-1:GOTO80Q 


20 IFR-1THEN SOUND 1,(XO*Y1*X2)X100,9 
25 IF Gei ANDPOINTCXO+A, YO+B)=-1 ТНЕМС=0 
`сото 8002 
28 L=L+1 
K$=KEY$ 


85 CURSET X1,Y1,1 

90 IF G=] THEN 600 

100 X2=X2+Q:Y2=Y2+W 

105 IF POINT(X2,Y2)=-1 THENC=2:GOTO800 
11@ CURSET X2,Y2,1 

128 GOTO 20 

300 REM == ERREUR ORDINATEUR == 

305 H=INTCRND(1)%2) : IFH=OTHENS=-1ELSES= 
318 IF op THEN ñ= S:GOTO 325 

320 IF Bop THEN 
TO 4 
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146 


330 
335 
340 
350 
400 
405 
410 
420 
425 


РТ=РОІМТСХО+МЖА, YO+MXB) 
IF PT<>-1 THEN NEXT M 

IF PT=-1 THEN fi--8:B--B 
RETURN 

REM == PRESENTATION == 
TEXT:CLS:PLAY 0,0,0,0 
PAPER? : INK1 

E$=CHR$( 27) 

PRINT CHR$(4) 


BC 


430 PRINT" "E$"J"ES"S"E$"A LIGHT 
TRACK  "E$"W":PRINTCHR$C4) 
ЇРКІМТ 


440 PRINTCHR$C96);" TILT MICRO" 

445 PRINT:PRINT:PRINT"Uoulez-vous des ex 
Plications (0ZN)";:GET ЕХФ: 
IFEX$z"O"THEN1000 

450 PRINT:PRINT:PRINT:PRINT"Effets sonor 
es (O^N)";:GET R$ 

460 IF R$="O"THEN R=1 

465 IF R21 THEN PLAY 7,0,0,0 

420 XO-INTCRNDCI2X180)*20:YO- INTCRNDCI2X 
150)%10: 1 

480 PRINT :PRINT :PRINT'"UERSIONS : " :PRINT :P 
RINT :PRINT"<1> SEUL CONTRE 

С? ORDINATEUR" 

490 PRINT:PRINT:PRINT"42» 2 JOUEURS" :GET 


BH HIRES 

502 FORI=1 TO 20:XX-INTCRNDCI2X1802 130: Y 
Y=INT CRNDC1)X150)*30 

503 CURSETXX, YY, @:CIRCLE 18, 1:NEXT 

505 PRINTCHR$C12) 

510 PAPERS : INK4 

520 CURSET 20,0,9 

525 DRAW 219,0,1 

530 DRAW 0, 199,1 

535 DRAW -219,0,1 


540 DRAW @,-199,1 

550 PRINT :PRINT" <<< LIGHT TRACK 
>>>" 

56@ RETURN 

600 REM == ORDINATEUR == 

619 ХО=ХО+А :YO=YO+B 

620 CURSET Х0,Ү0,1 

630 FOR N=1 TO 3 

635 PO-POINTCXO*NXA; YO+NXB) 

640 IF РО<2-1 THEN NEXT N 

650 IF PO=-1 THEN GOSUB 300 

668 GOTO 20 

800 REM == PERTE DU JEU == 

805 TEXT:CLS:IFR-1 THEN EXPLODE 
808 PRINT :PRINT :PRINT :PRINT 


810 IF С=@ THENPRINT"UOUS AVEZ GAGNE? BR 


AUG.":GOTO 830 

820 PRINT"LE JOUEUR ";C;"A PERDU?" 
830 PRINT:PRINT:PRINT:PRINT"DUREE DU JEU 
ЕЗІ 

840 PRINT:PRINT"UNE AUTRE PARTIE (0/М2:" 
}:бЕТ R$ 

0" THEN RUN 

N" THEN END- 

870 GOTO 840 

1000 CLS:PRINT 

1819 PRINTCHR$C132);"Resle generale:":PR 
INT 

1020 PRINT'uous deplacez un point qui la 
isse" :PRINT 

1030 PRINT"derriere 
use," :PRINT 

1040 PRINT"Cette trace ainsi que les bor 
ds ne":PRINT 

1050 PRINT"sont plus franchissables et u 
ous" :PRINT 

1060 PRINT"deuez tentez d'enfermer votre 
"PRINT 

1020 PRINT'aduersaire a l'interieur." 
1025 PRINT*PRINT"pressez une touche" ;:GE 
T z$:CLS 

1080 PRINT:PRINTCHR$(132);"2 JOUEURS :" :P. 
RINT 
1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1128 
1180 
1190 
1200 
1210 
ІМТ 
1220 PRINT"Uous utilisez les touches du 
Joueur" :PRINT 

1230 PRINT"gauche (DSAZ) et vous partez 
du" :PRINT 

1240 PRINT"centre de l'ecran," PRINT 
1250 PRINT"l'autre trait represente 
' PRINT :PRINT "BONNE CHAN 


lui une trace lumine 


PRINT"- Joueur de droite :! :PRINT 
PRINT" ? a droite":PRINT 

PRINT" ; a gauche" :PRINT 

PRINT" L haut" :PRINT 

PRINT" , bas":PRINT 

PRINT"- joueur de gauche :" :PRINT 
PRINT" D `a droite":PRINT 

PRINT" S а gauche" :PRINT 

PRINT" A haut" :PRINT 

PRINT" Z bas" :PRINT 
PRINT"Pressez une touche"; GET Z$ 
CLS :PRINT 


PRINT CHR$(132);"Contre l'ORIC:":PR 


L'OR 


1260 PRINT:PRINT"Pressez une touche" ;:GE 
T 2$ 
1270 CLS:GOTO 450 


$e ORIC-BRIQUES 


Défoulez-vous en cassant des briques. 
Une reprise des premiers jeux vidéo de café. Mais celui-ci, 
contrairement à ces ancétres, 
posséde sons et couleurs. 


«Œ 


BUT DU JEU de la raquette choi Et si vous voulez partie. | : 
ы rire, choisissez une taille de raquette su- - Vous disposez de trois balles. 

Vous devez détruire peu à peu un mur de  périeure à 5. Vous allez avoir une petite -Le déplacement de la raquette se fait par 
briques à l'aide d'une balle d'acier. Vous surprise quant à la représentation de la l'intermédiaire des touches d'édition si- 
disposez d'une raquette pour renvoyer la ^ raquette. tuées en bas du clavier à droite et à 
balle vers le mur, Parfois elle s'infiltre à gauche. La flèche au-dessus de la touche 
l'intérieur et détruit une grande partie du indique la direction que prendra la raquette. 
mur sans aucun effort de votre part. Bien 

sûr la difficulté du jeu dépend de la taille tre 1 et 4, au-dessus pour faire une folle 


@ REM COPYRIGHT TILT-MICRO IF A=@ THEN 120 


1 X=1:Y=26 140 PLOT X,Y,ER$ 
2 POKE 618,10 150 X=X+A 
152 A=@ 


3 HN$="?????" :RE=50 
5 CLS:PAPERO:INK3:GOSUB 5000 

10 CLS :PAPERO : INK3:R=5 

12 ЕВ%="" 

15 RESTORE 

20 РӦКЕ 853,200 

30 FORI-4T026 :PLOT2, 1, CHR$( 255) :PLOT38, I 
: CHR$C255) :МЕХТ 

40 PLOT 2,3,20:PLOT 3,3, 1:PLOT 14,3, "ORI 
C-BRIQUES" 

50 FORI-46856 TO 46870:RERD C:POKEI,C:NE 


155 IF X43 THEN X-3 

160 IF X>TG THEN X-TG 

165 PLOT X,Y;R$ 

120 REM xc BALLE chen 
180 PLOT DM." 
190 Q=Q+G:W=W+H 

208 S=SCRN(Q,M) 

219 IF 5-98 THEN GOSUB 1100 

220 IF S=97THEN W=W-H: Н : SHOOT :G=INTCR 
NDC1)X22:IF Gë THEN G 
230 IF 0<3 OR Q>32 THENG--G:Q-0*G 
240 IF W<4 THEN W=4:H=-H 

242 IF Q-3 AND W=25 THEN 0-4 

244 IF 8-32 AND W=25 THEN 0-36 
245 IF W>25 THEN 2000 

250 PLOT G,W,B$ 

528 GOTO 100 

1000 Q=19:W=13::A=0:G=0:H=1:Y=26 
1005 X-20-CLENCR$)72) 


60 FOR 1=5 TO 12:FORJ=4T036 
20 PLOT Ј, І, "Ь" :МЕХТЈ :NEXTI 
22 IF TR=1 THEN 
24 IF TR=2 THEN 
26 IF TR=3 THEN 
78 IF TR=4 THEN R$-"aaaaa" 

80 IF ТК<1 AND ТК<>2 AND TR<>3 AND TRO 
4 THEN R$-"aaà аа aa" 


1010 RETURN 
81 GOSUB 1000 
82 IFLENCR$2?20THENCLS :PRINTCHRSC17) ; "RA 1190 E Б sa. 


QUETTE TROP GRANDE." :POKE8S 

3,30 :EDIT80 :END 

83 FORI=1TOLENCRS) :ER$=ER$+" ":NEXTI 

B4 B$z"o":TG-38-LENCR$) 

85 PLOT 1,26,1:PLOT X,Y,R$ 

90 PLOT 1,0,4:PLOT 2,0, "BALLE :":PLOT8, ð, 


1115 IF L-2640THENL-L *100 :PLOT15, 15, "BON 
US 100" :WAIT 80:GOTO 10 

1120 H--H:G-INTCRNDC1)X2):IF G-0 THEN G= 
1 

1130 RETURN 

2000 R=R-1:1F В=0 THEN 2050 


STRSCR) 
92 PLOT 1,1,2:PLOT 2,1, "HI-SCORE :" :PLOTI 2005 Ge SE 
1,1, STRSCRE) Gr 


2030 GOSUB 1000:PLOT X;Y;R$:WAIT 30 
2040 GOTO 102 
2050 CLS:IF L>RE THENPRINT :PRINT"RECORD? 


2051 POKE 853,30 


93 PLOT 20,1,2:PLOT 21,1,HN$ 
94 PLOT 1,2;1:PLOT 2,2, "SCORE :" 
100 IF PEEK(S20)=188 THEN ñ= 
110 IF РЕЕКС520)=172 THEN ñ=-2 


2055 IFL>RETHENINPUT "VOTRE NOM S.U.P:"5 
HNS :HN$=HID$(HN$,; 1,8) :RE-L 

2057 PRINT:PRINT"SCORE :  ;L 

2060 PRINT:PRINT"UNE AUTRE PARTIE CO/NJ" 
1 :GET P$ 

2020 IF Р%="0" THEN L=0:GOTO 10 

2080 IF Р%="М" THEN CALL 555:END 

2090 GOTO 2060 

3000 DATA 63,63,63,63,63,63,0,0 

3819 DATA 55,55,55,0,61,61,61,0 

5000 REM PRESENTATION 

5005 С=@ 

5010 ҒОБВ1-4808070490005ТЕР40 


5820 POKE 1,10:МЕХТ 

5025 PRINT СНК%(4) 

5030 FOR I=1T011:PRINTSPC(12)"ORIC-BRIQU 
ES" 

5035 PRINT :NEXT :FORI=1TO2SSTEP2:C=C+1:1F 
C-8THENC-1 

5038 PLOTO, I, C:PLOTO, I* 1, C:NEXT 

5039 PLOT 19,26, "PRESSEZ LINE TOUCHE.. 
5040 GET 2$:PRINTCHR$(4) 

5050 CLS:PRINT:PRINT'TAILLE RAQUETTE:1 2 
3 4:";:GET TR 

6000 RETURN 


ee LONGCHAMP 


Tentez votre chance au tiercé. 
Mais ne comptez pas trop sur le hasard. 
Vos finances sont assez limitées, choisissez le bon cheval, 
sinon gare à la ruine. 


B quelques questions, vous verrez la course de joueurs et faites vos pronostics. 
EE se dérouler à l'écran. - Après votre mise, les chevaux s'appro- 


Pariez sur le cheval gagnant, en lui don- 
nant une cote ou un handicap. Bien súr, le 


AU CLAVIER 


chent de la grille de départ. C'est parti ! 


résultat de la course dépend de la cote de 
chaque cheval. Aprés avoir répondu à 


1 REM COPYRIGHT TILT MICRO 

2 GOSUB 1000 

5 DIM NO$(20),S0(20),PR$(20),HI(20) 

10 PRINT CHR$(12) :PAPERA : INK? 

15 U=2:E$=CHR$(22) 

18 PRINT" 

20 PRINTCHRS C4 )CHRS (27) N'CHRSC22) "0 TI 
ERCE "CHR$(22)"T";CHR$(4) 

25 PRINT:PRINT 

3@ PRINT"TILT MICRO" :PRINT :PRINT 

33 IF FG=@ THEN INPUT'Nombre de tours): 
“ТЕ:Ебе1:6507010 

34 FOR В0-1 ТО TR:RESTORE 

35 FOR РҮ-1 TO 40:REñDC:NEXTPY:GOSUB285 

Е FL=@ THEN INPUT"Nombre de Jo 


45, PRINT:PRINT"Preparez vos Pronostics,P 
uis pressez · la barre d'esp 

ace,” 

48 GET A$:CLS 

49 PRINT:PRINT"COURSE N’ " ;B0:PRINT 

58 FOR I-1 TO JO 

SS PRINT:IF FL-0 THEN SOCIJ-100 


50 PRINT"Joueur " INPUT "Uotre pronost 
ЕФСІЈ 
62 IF LENCPR$CI2)4»3 GOTO 60 


148 


- Choisissez le nombre de tours que doi- 
vent effectuer les chevaux puis le nombre 


65 PRINT "vous avez "j;SOCI);" Francs" 

82 PRINT:INPUT"Uotre mise:";MICI) 

68 IF SOCI)-MICI)<@ THENPRINT"TRICHEUR?" 
:GOTO 65 

69 SOCIJ-SOCIQ-MICIO 

20 NEXT I:FL-1 

25 PRINTCHR$( 17) 

80 PRINTCHR$( 12) 

82 INK1:E$=CHR$(22) 

85 PRINT :PRINT :PRINT : PRANTS PRINT:PRINT:P 
RINT:PRINT:PRINT" « АМ 
92 PRINTCHRSC42ES"N"ES"WATTENTION AU DEP 
ART? "ЕФ"Т" 

95 PRINT CHR$(4) 

92 FOR 5-1 TO 4:PING:WAIT 30:NEXTS 

100 WAIT 300 


119 cÛs 
115 FOR 1-120 TO 7205ТЕР 120 
120 RERD PO 


135 POKE 48039+1+3,РО 

140 РОКЕ 48040%1,32 

145 NEXT I 

150 PAPER2:INK@ 

155 FORI=@ ТО 36:PRINT"*" ; :NEXTI 
FORI=1TO24 :PRINT :NEXTI 
FORI=@ TO 36:PRINT'\";:NEXTI 


172 FORI=3 TO 18 STEP 3 [ RON" 

182 PLOT 2,1,"8f" 39@ DATA"P'TIT GIBUS", "WHITE LABEL", "ALL 
188 NEXT I ES FRANCE" 

195 REM Жжжж DEPLACEMENT Xxxx 395 DATA"MELI MELO", "CHIC TYPE" 

196 ҒОКІ-1Т06:ХС12-2:МЕХТ I 422 DATA 0,1,3,4,5,7 
- 280 FORY=3 TO 18 STEP 3 410 REM XXX FIN DES DATA xxx 

205 K=Y/3 500 CLS :PAPER4 : INK3 

210 CA=17-CACK)) 518 PRINT PRINT :PRINT 

212 IF THEN 220 520 Es=" "+CHR$(22) 

214 IF K=GA(1) OR K-GA(2) OR K=GAC3) THE 532 PRINTCHRSC4JES" J"ES"ORESULTATS :"ЕФ"Т 
N NEXT Y:GOTO 200 

222 AU=INTCRNDC1JXCA)+2 :AU=AU-3 : IFAU<=2T 540 PRINT :PRINT :PRINT :PRINT :PRINT 

HEN AU=INTCRND(1)X*4)+2 550 FORI-1TO3 

225 PLOT Х(К2,7," ":ñX(K)=X(K) 560 PRINTES"J"ES"G"GACIO;" "; 

230 X(K)=X(K)+ñU:IF X(K)>36 THEN XCKJ=38 522 NEXTI :PRINTCHRS(4) 

: GOTO240 580 PRINT :PRINT :PRINT 

235 IFX(K)>36THENF=F+1:Gñ(F)=K:GOSUB 900 585 КЕМ ЖЖЖ CALCUL DES GAINS Жж 

‘IF F=3 GOTO 500 590 FOR J-1 TO JO 

240 FOR R=AX(K)+1 TO XCK) "585 FORC-1T03 

245 PLOT R; Yy "AB" 600 FORK-1TO3 

248 WAIT 8 610 PN$-MIDSCPRSCJ),C, 1) :PN-UALCPN$) 

250 PLOTR,Y," " 620 ІҒРМ< БАСК) ТНЕММЕХТК :PRINT"Joueur "j 
251 IFREXCK) THEN 253 J;"Rien gagne, йеѕо le?" :NEXT 

252 К=К+1 J :G0T0285 

253 IFR>36 THEN X(K)=37:G0TO 235 630 NEXTC 

254 PLOT R; Y, "Өх" 648 FORU-1T02 

256 WAIT 8 650 PN$=HID$(PR$(J),U,1):PN=UñL(PN$) 

258 PLOT R,Y," " 660 IF PN=GACU) THEN NEXT U:TT=MICJ):GOT 
260 NEXT R 0680 

262 WW=INTCRNDC1)*2) : IFUU=QTHENNC$="@z"E 620 TT=MICJ)/2 

LSENC$-"& fi" 680 AR=TTXCACGAC1))X3+ACGAC2))#2+ACGAC3) 
265 PLOT R-1,Y,NC$ 33 

225 NEXT Y 685 AR=AR/10 

280 GOTO 200 690 PRINT"Joueur "jJj" vous avez gagne " 
285 FORI=1 TO 20:RERDCS$ :NÓSCIJ-C$ :NEXTI SAR ;"F" :SO(J)=SOC J FAR 

288 FOR 1=1 TO 6 200 PRINT :NEXTJ 

292 HACI)=INTCRNDC1)*20)+1 205 GETZ$:CLS:PRINTCHR$(12J:U=1:INK2:F=0@ 
292 FOR J=1 TO I:IF J=I THENNEXTI 208 F-0:FORBB-1TOS3:GACBB)-0:NEXTBB 

294 IF HACID=HACJITHEN290 218 NEXT BO 

295 IF 197 THEN NEXT J 715 INK3 

296 IF 172 THEN NEXT 1 720 PRINTCHR$C4)ES"J"ES"PRESULTATS FINAU 
300 FOR 1=1 TO 6 X :"CHR$C22)" T" 

305 C$-NOSCHACII):LE-LENCCS) 230 PRINTCHR$C4) :PRINT 

307 СО-ІМТСЕМ0С12Ж112%5 240 FORI=1 TO JO 

308 AC1)=CO 250 PRINT"Joueur п?" ;1;":" ;50С1) 

310 PRINTI;"&f:";C$; 760 PRINT :МЕХТ 

315 PRINT TñB(30-LE) "Cote :" 220 END 

316 PLOT 38,0, "/1" зва X(K)-3:0X(K)-3 

320 NEXT I :U=0 910 CC=120+CCY/3-1)X120) 

325 RETURN 328 POKE 48939+CC+3, 2 

328 КЕМЖЖЖЖЖЖЖЖ DATA жжжжжжжжж 930 POKE 48@49+CC, 32 

330 DATA @,@,@,31,63,23,2@,1@ 840 PAPER2 

332 DATA 8,22,24,56,60,52,20,40 950 RETURN 

334 DATA 0,0,0,31,63,23,20,40 999 REM XXX CARACTERES ЖЖЖ 

336 DATA 8,22,24,56,56,52,18,9 1@@@ FOR 1=46592 TO 46599 

338 DATA 9,0,63,18,63,18,18,18 1010 READ C 

340 DATA"L'AS DES AS", "LANTERNE ROUGE", " 1020 POKE 1,С:МЕХТІ 

PAPILLON" 1030 FOR 1-46326 TO 46383 

350 DATA"OURRGAN" , "POY-POY", "MARCHE ARRI 1042 RERD C 

ERE" 1050 POKE І,С:МЕХТ I 

360 DATA"BANJO", "L' INDESIRABLE";, "GRAND G 18060 FORI-46384 TO 46391 

UIGNOL" 1070 READ C 


1080 POKE I,C:NEXTI 
1090 ҒОЕ 1-46840 Т0 46842 


à 320 DATA"RAJI","JOLI COEUR"; "FIGRRO" 
380 DATA" JOLLY JUMPER", "L’ ARNAQUE", "MACA 


1100 READ C 1130 REñD C 
1110 POKE 1,С:МЕХТ I 1140 POKE 1,С:МЕХТІ 


1120 FORI=46816 ТО 46823 1150 RETURN 


gie ALTITUDE 0 


Vous avez réchappé à de terribles dangers, 
mais les envahisseurs que vous allez combattre aujourd'hui 
sont particuliérement redoutables. 
Soyez le plus rapide sinon vous perdrez une vie. 


% 


BUT DU JEU peu et ils se rapprochent inévitablement gauche et de droite. 
de votre vaisseau. - Pour tirer, pressez la barre espace. 
Vous devez à l'aide du canon Laser qui AU CLAVIER 
équipe votre vaisseau, abattre un à un les 
envahisseurs. Faites vite car la zone d'é- — - Déplacez votre vaisseau situé en bas de 


volution de vos ennemis s'abaisse peu à l'écran à l'aide des touches d'édition de — ————— — ———————— —————— 


8 REM COPYRIGHT TILT MICRO 112 IF X41 THEN X=1 

5 FORI-46856 TO 46935 119 IF X535 THEN X-35 

6 READ C:POKE I,C:NEXT 120 PLOT X,26,U$:PLOT X,25,U$ 

10 CLS :PAPERO : INK3:NU-3 125 PLOT XB,YB," ." 

11 PLOT 0,0,20:PLOT1,0,1 130 XB=XB+0:YB=YB+W 

12 PLOT 2,0, "SCORE PLOT 15,8, "HI-SCORE 131 IF XB<1 THEN XB-XB*1: Q 

UUSPLOT 31,3, "ТЕМР 132 IF XB>34 THEN ХВ-ХВ-1:0--0 

13 PLOT 16,1; STR$CHS) 133 IF YB=P+1 THENGOSUB 1508 

14 PLOT 0,3,20:PLOT1,3,1 135 IF SCRNCXB, YB) 232 THEN 2500 

15 PLOT 2,3, "UIES :" :PLOT15, 3, “PLAFOND :" 136 ІҒЅСЕМСХВ+1,ҮВ2 32 THEN 2500 

16 PLOT 3,4, STRSCNU) 132 IFSCRNCXB+2, YB) <> 32 THEN 2500 

12 PLOT 30,0, "М. JOUEUR : " :PLOT30, 1, N$ 138 IF YB=26THENGOSUB 1500 

20 РОКЕ 618,10 140 PLOT XB;YB,"dfj" 

25 X218:U$-"abc" :W=1 :Qz1:4$-"gh i" 141 РгЯҮ:1,0,0,0 

26 XB=INTCRNDC1)%34)+2 142 SOUND 1, INTCRNDC12X1002*10, 5 

30 P-5:C-0 145 C=C+] :PLOT32, 4, STR$CC) 

31 FORI-8T024:C-C*1:1FC-8 THEN С-1 150 IF C=100 THEN 2500 

32 PLOT @,1,C:NEXT 5@@ GOTO 68 

33 POKE 853,250 1000 REM ^* TIR хх 

35 P=P+1:YB=P+2:XB=INTCRNDC1)X*34)+2 1002 IT=1 

36 PLOT16,4," "SPLOT 16,4, STR$C21-P) 1905 PLAY 5,0,0,0 

32 IF P=21 THEN PING:SC-SC*100:CLS :GOTO 1010 FOR I-24 TO Р+1 STEP -1 

11 1015 SOUND 1, 4X1, 9:SOLIND 3, 20X1,8 

40 FORI-1 TO 37:PLOTI,P,"-":NEXT 1020 S-SCRNCX*1;, I) 

45 PLOTO,P,6 1030 IF S-102THENPLRY 0,0,0,0:GOTO 2000 
50 PLOT X,26,U$:PLOT X,25,U$ 1040 PLOT X*l,I," i" 

55 PLOT 0,26,7:PLOTO, 25, 1 1950 NEXT:PLAYO,0,0,0:FOR1-24 TO Pri STE 
68 IF РЕЕКС520)=157 THEN GET Z$ Kiel 

85 IF PEEK(520)=56THEN 125 1@6@ PLOT Х+1,1," ":NEXT:PLAY 0,0,0,0 
20 ІЕРЕЕК(520)-143 THEN: A=2 1078 GOTO 118 

ВӘ IFPEEKC520)-131 THEN A=-2 1500 REH REBOND H,B 

90 IF PEEK(520)=124ñNDIT=@THEN GOTO1000 1518 М-ы 

108 IT=@ 1520 H-INTCRNDCIJX2):IF H=@THENG=-1ELSEQ 
110 PLOTIX:26," _ ":PLOTX;25," Lin = 

115 Х=Х+®:а=@. 1530 RETURN 


150 


2008 КЕМ TOUCHE 

2092 PLAY 1,0,0,0 

2003 REPEAT 

2005 FORI-60T080:SOLIND1, I, 8:NEXTI :2-2*1: 
UNTIL 2-4:2-0 

2010 PLAY 8,0,0,3 

2020 PLOT ХВ, ҮВ, "еее" :ИАІТ 5 

2030 FORI=24 TO YB+1 STEP -1 

2040 PLOTX+1,1," ":NEXT:PLOT XB, YB," 
2050 5С-5Сж(100-С):4-1 
2052 Q-INTCRNDC1)X2) : IFQ: 
2055 FORI-1T032:PLOTI;P; 
2060 C-0:PLOT 32,4," z 

2020 PLOT 3,1,5ТК%(5С) 

21@@ GOTO 35 

2500 REH PERTE 

2510 PLAY 7,@,@,@:МШ51С 1,8, 1,;9:WAIT20:P 
LAY @,@,@,@ 

2515 WAIT 15 

2520 C-0:NU-NU-1:IF NU=Q THEN 2600 

2522 PLOT XB, YB," У 

2525 PLOT 3,4,STR$(NU) 

2530 PLOT 32,4," 2 
“2535 ХВ=18:ҮВ=Р+2 


2540 GOTO 60 

2690 CLS 

2695 РКІМТ:РКІМТ 

2610 IF SC>HS THENPRINT"RECORD BATTUL":P 
RINT 

2620 IFSC>HSTHENHS=SC :INPUT"UOTRE NOM:"; 
N$:PRINT :PRINT "MERCI. " :N$=M 

ID$CN$,1.8) 

2630 PRINT:INPUT'UNE AUTRE PRRTIE";RS 
2640 IF R$="0" THENCLS:SC-0:NU-3:GOTO11 
2650 РКІМТ:РКІМТ"АШ REUOIR?" 

2652 POKE 853,32:PRINTCHR$(C12) 

2655 END 

5008 DATA 20,21,23,23,22,20,28,8 

5018 DATA 54,55,55,21,20,28,20,20 

5028 рата 20,20,52,52,52,20,28,8 

5030 DATA24,24,31,1,1,63, 48,32 

5040 DATA 32,16,2,42,1,21,0,43 

5850 DATA 33,63,45,45,63,63,18,12 

5060 рата 0,0,0,0,1,9,9,28 

5070 DATA 8,8,28,62,63,43,9,28 

5082 DATA 9,0,0,0,0,8,8,28 

5090 DATA 6,6,62,32,32,63,3,1 


TILTMAN 


Vous pensiez avoir détruit pour toujours 
ces nombreux enzimes gloutons 
et fantómes qui hantaient le cháteau de vos ancétres, lourde erreur. 
Certains d'entre eux ont survécus. 


BUT DU JEU 


Vous incarnez aujourd'hui un enzime 
glouton affamé. Il a une telle faim qu'il doit 
dévorer toutes les pastilles se trouvant sur 
son chemin. Malheureusement, un fan- 
tóme vous poursuit. Échappez-lui le plus 
longtemps possible. Mais des bonus aux 


supplémentaires. 


6 REM COPYRIGHT TILT-MICRO 
1 AP$="b" :FR$="k":DR$=" |" :PG$="dd" 
‘3 TA=50:TD=40:T1=30:NP=3 

5 POKE 618,10:POKE 853, 100 

10 TEXT :CLS :PAPER4 : INK1 

20 FOR б-46856 TO 46959 

25 RERD C:POKE ñ,C:NEXT ñ 

26 А=0:В=0 
*38.FOR 1-2 TO 12 
35 PLOT 1-1,12," 
bh" :WAIT 15:NEXTI 
40 WAIT 100 


"PLOT 1,12, "db TILTMAN 


quatre coins du labyrinthe vous permet- 
tent de le dévorer. Des fruits situés prés de 
son repaire vous donneront des points 


AU CLAVIER 


- Dirigez votre petit enzime glouton à 


l'aide des touches : 


CLS: INK4 :AP$ 
:YF=9:F$="h": 
PRINT 

IF FR$="J" THEN FR$-"k"ELSEFR$-"J" 
PLOT 28,26,5:PLOT 29,26,DR$ 

FOR I=1 TO 27 

PLOT I,0,"a":PLOT 1,26, "а" :МЕХТІ 
PRINT'"abbbbbbbbbbbbabbbbbbbbbbbba" 
PRINT"abaaaabaaaaababaaaaobaaaaba" 
PRINT"abaaaabaaaaebabaaaaabaaaaba" 
PRINT"abbbbbbbbbbbbbbbbbbbbbbbbba" 
PRINT"abaaaababaaaaaaaaababaaaaba" 


-14:Y-20:P$- 
:АЕ=-1 


151 


152 


180 PRINT"abbbbbbabaaaaaaaaababbbbbba" 
190 PRINT"aaaaaababbbbbabbbbbabaaaaaa" 
2@@ PRINT" abaaaaababaaaaaba" 
210 PRINT" ebabbbbbbbbbbbaba" 
220 PRINT" ababaaa===aaababa" 
230 PRINT"aaaaaababa ababaaaaaa" 
240 PRINT"bbbbbbbbba abbbbbbbbb" 
250 PRINT"aeaaaababaaaaaaaaababaaaaaa" 


260 PRÍNT" ababbbbbbbbbbbaba" 
220 PRINT" ebabaaaaaaaaababa" 
280 PRINT"aaaaaababaaaaaaaaababaaaaaa" 


290 PRINT"abbbbbbbbbbbbabbbbbbbbbbbba" 
300 PRINT'abaaaabaaaañbabaaaaabaaaaba" 
310 PRINT"abaaaobaaaaababaaaaabaaaaba" 
320 FRINT"abbbbabbbbbbbbbbbbbbbabbbba" 
330 PRINT'aaaabababaaaaaaaaabababaaaa" 
340 PRINT"abbbbbbabbbbbabbbbbabbbbbba" 
350 PRINT"abaaaaaaaaaababaaaaaaaaaabo" 
360 PRINT'abaaaaaaaaaababaaaaaaaaaaba 
320 PRINT"abbbbbbbbbbbbbbbbbbbbbbbbba" 


322 PLOT 28,24,1:PLOT 29,24,GD$ 

325 PLOT2,2, "c" :PLOT28, 2, "c" :PLOT2,20, "c 
" 3PLOT26, 20, "c" 

328 PLOT X,Y,P$ 

380 INK3 

381 PLOT28, 15, 6:PLOT29, 15, PG$ 


382 PLOT11; 12; "TILTMAN" 

385 PLOT 28,0, 1 :PLOT29,0, "SCORE :" 
390 REH == ACTION == 

400 К%-КЕТ% 

401 IFTE>OTHENTE=TE-1ELSEN=1 :F 
403 L$-STR$(L) :PLOT28, 1,1% 
410 IF K$="L"THENA=1 :В=0 :Р: 
420 IF K$="K"THENñ=-1: 

430 IF K$="A"THEN 
440 IF K$-"Z"THENR: 
450 PLOT X,Y," " 

455 X=X+4ñ:Y=Y+B 
460 IF X-6 AND Y-12 THEN X-27 

465 IF Х=28 AND Y-12 THENX-1 

420 SC-SCRNCX, Y) 

475 IF SC-104 THEN 2000 

480 IF SC-105THEN3000 

485 IF SC-97 OR SC-61 THEN X=X-A:T=Y-B 
490 IF SC-98THENL-L*10:CP-CP*1:PING:IF C 

P>225THEN6000 3 

495 IF SC-99 THEN GOSUB 4000 

500 IF SC-1060RSC-107THENL-L*300:CC-0:IF 
ES$="0"THENGOSUB 6100 

588 PLOT X,Y,P$ 

60а REM== FANTOME 

610 IF XF <XTHENAF: 

620-IF XF>XTHENAF=-1 :BF: 

630 IF YF«Y THENBF-1:6F-0: 

640 IF YF>YTHENBF=-1:ñF=0 

650 РІ.ОТХҒ, YF APS :ХҒ=ХҒ+МЖАҒ :ТЕ=ТЕ+П1ЖВЕ 

655 IFYF=12ANDXF <1ТНЕМХЕ-22 

658 IFYF=12ñNDXF>22THENXF=1 

660 SF=SCRN(XF,YF) 

628 IF SF>99 AND 5Ғ<104 THEN 2000 

580 .IFSF=920RSF=61THENN=N+1 :GOTO900 

690 AP$=CHR$(SF) 

200 PLOT XF; YF, F$ 

219 CC-CC*1:1FCC-TRTHENPLOT14, 14, FR$ :DC= 


8 :60Т0650 


ШЫҢЫ. 


GOTO 400 

REM=BLOQUE = 

XF=KF-M*AF :ҮҒ-ҮҒ-МЖВҒ 

PLOT XF,YF,F$ 

IF N-2 THEN N-0:GOTO408 

IF ñF=1THEN620 

IF AF=-1THEN638 

PLOT XF,YF,RP$ 

940 6070402 

2000 REM--PERTE-- 

2005 PLAY 2,0,3; 10 :HRITSO :EXPLODE 

2010 NP-NP-1:1F МР-ЙТНЕМ 2050 

2012 IFNP-2THENPG$-"d"ELSEPGS-" " 

2013 PLOT 28,15,6:PL0T29, 15, " " :PLOT29 
;15,PG$ 

2015 PLOT X,Y," " 

2020 Х-14:Ү-20:ХҒ-14:ҮҒ-9 

2040 GOTO 390 

2050 CLS:PRINT:PRINT:PRINT"SCORE FINAL :" 
;L 
2060 
3000 
3805 
3018 
3012 


3015 
3020 


4000 
4001 
4002 
4005 
4010 
5008 
5010 
5020 
5030 


PRINT :PRINT :END 
REM==GOBE FANTOME== 
605086100 
L=L+300 :CP=CP+1 
F$-"h" : IFCP>228THEN6000 
XFz14:YF-9:TE-0 
GOTO 400 
REM== ENERGIZER == 
ZAP 
СР=СР+1 :1 = +100 :Ғ%= "1" 
IF CP>278THEN6@00 
=-1 : TE=T1 :RETURN 
DATA 63, 63, 63, 63, 63, 63,63, 63 
DATA 8,0,0, 12, 12,0, 0,0 
DATA 8,0, 30, 30, 30, 30,0,0 
DATA 12,30,59, 63,56,63, 30, 12 
5940 DATA 12,30,55,63,2,63,30,12 
5050 DATA 0,0,18,51,63,63,30,12 
5860 DATA 0,0, 12,30,63,63,51,18 
5070 DATA 12,30,63,45,45,63,63,45 
5080 DATA 12;30,51,33,33,33,63,45 
5090 DATA 6,8, 12, 30,63, 30, 12,0 
5108 DATA 9,28, 20, 28,8, 12,8, 12 
5118 DATA 16,24,28, 30,16, 16, 16,16 
5120 DATA 30,30, 30, 30, 16, 16, 16, 16 
6000 REM==FIN DE TñBLEñU== 
6019 PLOT XY," " 
6012. ñ=0 ;B=0 
6015 PLAY 2,0,0,0 
6020 FORI=40 TO 10 STEP -2 
6030 SOUND 1,1, 9:WAIT 05:МЕКТІ:РІ.8Ү0,0,0 
30:PL8Y1,0,1, 10 
5032 DR$=DR$+" L" 
6033 IF LENCDR$)-5 THEN DR$="" :60%=60%+" 
n" 
6034 
5035 


PLOT28, 24, 1 :PLOT29, 24, GD$ 
TA=TA+3:TD=TD-2:T1=T1-2:CP=0 
6036 IF TD<@THENT 
6038 IF Т1<@ТНЕМТ1=@ 
5039 WAITSB:PING 
6049 GOTO 180 


5120 SOUND 1,1,9:МЕХТІ 
6138 PLAY 0,0,0,0 
6140 RETURN . 


6109 REM ==SON GOBE== 
6105 PLAY 1,0,1,10 
6110 FOR 1=1@ TO 358 STEP 10 


FORMULE 1 


Pilote de Formule 1, vous allez vivre 
une épreuve comptant pour le Championnat 
du monde de la spécialité. 


autres concurrents. Vous n'avez droit qu'à 
neuf fautes de pilotage. Chacune d'elles 
est précisée par un bip sonore. Comptez- sées par deux flèches horizontales, si- 
les bien car votre victoire en dépend. tugap à gore du clavier. ; 
- Aprés neuf collisions, votre score s'af- 

AUISLANIER а ЗУУ, 


bleu, utilisez les touches d'édition de 

HUT DU JEU gauche et de droite. Elles sont symboli- 

Au volant de votre Formule 1, vous allez 
participer à une course un peu spéciale. 
Aucune régle précise n'a été fixée par les 
juges de piste. Il faut tenir le plus long- 
temps possible, en évitant les bolides des 


- Pour déplacer votre bolide de couleur 


М0(12Ж8%122:ҮС12-5:5С-6С»100 


Х(12-26:Ү(12-80:С(12-2 
хс2 6:Y(2)=39:C(2)=9 


50 Х(33-26:Ү(32-165:С(32-15 J) AND ((YC12*2602150 AND YC124126) TH 
52 КЕП DESSIN UQITURE = EN BEEP2:NH=NH-1:1F NH=@ THEN NU=NU-1: 
70 PATTERN 52, "зо22зғазазавасас" 


80 PATTERN S51, "203F233F 30022000" 380 IF NU=@ THEN 410 
90 PATTERN 542, "BCE4FCCACA603030" 390 NEXT 

100 PATTERN S43, "ВаЕССаЕСВС@@@@@@" 400 GOTO 240 

119 REM: === DECOR wes 410 REM === PERTE. === 
120 SCREEN 2,2:CLS 415 SCREEN 1,1:CLS 
130 COLOR 12, 12, (0,0)-(255,1912,12 420 FOR 1=@ TO 2 

140 COLOR 14,14,(70,0)-(189,1912,12 


COLOR 15,15,(61,092-С69,1912,12 
COLOR 15,15,0(198,02-(205, 1912,12 
FOR 1=@ TO 180 STEP 40 

COLOR 8,8, (68, 1)-(69,1+28), 1 
COLOR 8,8,(196,1)-(206,1*20),1 


200 NEXT 480 PRINT :INPUT "Une autre partie (O7 
210 MAG 3 Des 

220 SPRITE 9,(Х,1503,0,4 498 IF PERINI STOENTERO 
230 REM DEBUT - 502 IF R$-"O" THEN 10 
240 KS=INKEYS 510262102460? 

252 SOUND 5,2,1@ 

260 IF Ks="" THEN 330 

270 A=ASCCKS) 

280 IF A=28 THEN X=X+1S 

290 IF X>164 THEN X-164 

300 IF A=29 THEN X-X-15 

310 IF X«68 THEN X-68 

320: SPRITE ð, (X, 159),9; 4 

338 FOR I=1 TO 3 

348 IF ҮС122182 THEN X(IJ=68+10x(INT(R 


350 Y(1)=Y(1)+ñY 
360 SPRITE 1,(X(1),Y(1)),@,C(I) 
320 IF ((X(1)+28)> (X14) AND X(1)<(X+24 


NH=3 


425 COLOR 1+5,1+5 

430 SOUND 4,1,10 

440 FOR J=] Т0190:МЕХТ 

450 МЕХТ І:ВЕЕР 2 

460 CLS:COLOR 12,1 cta 

470 PRINT :PRINT "SCORE FINAL :";SC 


Depuis dix jours les communications ` | 
entre la Terre et la Lune ont été interrompues. 
Vous partez à bord d'un LEM, 
vers la base Alpha pour connaitre 
les raisons de ce silence. 


BUT DU JEU 


Votre voyage de la Terre à la Lune s'est 
passé sans encombre. Maintenant, il faut 
alunir, vos instruments de vol sont hors 
d'usage et l'attraction lunaire se fait de 
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plus en plus forte, Vous devez vous poser 
avec le peu de carburant restant, sur l'une 
des deux aires aménagées. 


AU CLA 


bas, à gauche et à droite. 


TO REM Copyright TILT MICRO 
20 КЕМ SEGa-YENO SC Зада 

38 КЕМ PRESENTATION 

40 CLS:SCREEN 1, 1 :COLOR4, 11 
50 PRINT :PRINT :PRINT :PRINT, :PRINT 
PRINT :PRINT :PRINT :PRINT :PRINT :PRI 
NT :9RINT 

60 PRINT " 

70 PRINT CHR$(253);:PRINT " 
F ñ<25 THEN 70 

80 PRINT :PRINT 

90 PRINT " 

102 PRINT 

118 PRINT " `; 
120 PRINT CHRS(253); PRINT; " 
ТЕ B<25 THEN 120 

130 FOR 1=1 TO 199:NEXT I 
140 PRINT :PRINT :PRINT PRINT :PRINT 
PRINT :PRINT. :PRINT :PRINT :PRINT:PRI 
NT PRINT :PRINT :PRINT :PRINT :PRINT 
PRINT :PRINT :PRINT :2RINT :PRINT:PRI 
NT PRINT 

150 REM DECOR DU JEU 

160 SCREEN 2,2:CLS:COLORI1,1, (0, 0)- (255 
‚1812,14 

122 LINE (151,151)-(191,151),2 

188 І.ІМЕ(50; 1622-(65, 1622,2 

198 DATA 8,151,1,151,2,151,3,151,4,151 
15, 152,6, 15157, 152,8, 153,9, 152, 10, 151 
200 DATA 11,151,12,152,13,153,14,154,1 
5,153, 16; 153, 12,152, 18, 152,19, 151 

210 DATA 22,150,21,151,22,151,23,150,2 
4,149, 25, 148,26, 148,27, 149,28, 148, 29, 1 
49 

222 DATA 38,150,31, 151,32, 152, 33, 153,3 
4,154,35, 155,36, 156, 32, 157, 38, 158,39, 1 
59 

232 DATA 42,160,41,161,42,160,43,161,4 
4, 1602,45, 163, 46, 164,47, 165, 48, 166, 49, 1 


` 3 1A=A+2:] 


S.9.S LUNE" 


- Ce logiciel nécessite l'utilisation d'une 


67,50, 167 
240 DATA 66, 167,67, 168,68; 169, 69, 169,2 
9,169,71,122,22,121,23,121,24,122,25,1 
22 

252 DATA 26,123,22,124,28,125,29,126,8 
ð, 176,81, 122,82, 178, 83, 179, 84, 189, 85, 1 
81 

268 DATA 86, 180,87, 129,88, 178, 89, 177,9 
8, 176,91, 175, 92, 174, 93, 173,94, 172, 95, 1 
21 

222 DATA 96, 178,97, 169, 98, 169,99; 168, 1 
20, 167, 131, 166, 102,165, 103, 164, 104,163 


282 DATA 105, 163, 186,164,197, 163, 108,1 
62,109, 161,118, 168, 111, 169, 112, 159 

290 DATA 113, 158,114, 158,115, 152, 116, 1 
56,112, 156, 118, 155, 119, 155, 120, 154 

302 DATA 121,154,122, 155, 123, 154, 124, 1 
54, 125, 153,126, 152, 122, 153, 128, 153 

310 DATA 1129; 152,138, 151,131, 156, 132, 1 
58, 133, 149, 134, 148, 135, 147, 136, 147, 132 
s146, 138, 145, 139, 146, 140, 142,141,147 
320 DATA 142, 148, 143, 149,144, 149,145, 1 
48, 145, 147, 147, 148, 148, 149, 149; 150,150 
3151 

332 DATA 192, 153, 193, 149, 193, 149, 194, 1 
48, 195,147, 196, 147, 197, 146, 198, 145, 199 
1146, 288, 145, 221, 144, 202, 144, 203,143 
348 DATA 204,142, 205, 141, 206,141, 207,1 
40, 208, 139, 209,138, 210; 132, 211, 132 
350 DATA 212,136,213, 135,214, 134,215,1 
34,216, 135,217, 136,218, 136,219, 135 

360 DATA 220, 136, 221,137,222, 138,223, 1 
38, 224, 139, 225, 148, 226,141, 222, 142 

370 DATA 228,141,229, 142,230, 143,231,1 
44, 232, 145, 233, 146, 234,147, 235,148 
382 DATA 236, 149,237, 158;238, 151, 239,1 
52,240, 153,241, 154, 242, 154, 243, 153 

392 DATA 244, 152, 245,.153,246, 153, 247, 1 


manette de jeu. Elle doit être connectée 
sur le port 1. Les quatre directions per- 
mettront de déplacer le LEM, en haut, en 


[ 54,248,155,243, 156,252, 156, 251, 157 620 IF C<i THEN 252 


400 DATA 252, 156, 253, 156, 254, 155, 255; 1 8380 IF ñ>162 AND В<65 AND в›5@ THENG8@ 
54 
418 FOR 1=1 TO201:READ A,B:PSET (A,B), 648 IF A>151 AND В<191 AND B>151 THENG 
В:МЕХТ ва 
420 PAINTC169, 1602, 4 650 iF E=1 THEN SPRITE1, (B, 41152, 4,10 
430 LINEC52, 1622-65, 1623,7 :SOUNDS, 2, 15:SOLINDS, 2, 15 : SOUNDS, 2, 15:S 
442 MAGI 0UNDƏ 
450 REM CREATION LEA 668 SPRITE1,(B,ñ+15),8,1 
460 PATTERNS#2, "22270F 1с1сёса>?аз" 620 E=0:GOTO 540 
470 РАТТЕЯМ541, ‘270F1F3F1F323030" 682 SCREEN 1,1 :CLS:SOUNDS,2,15:FO0R 1-1 
480 PATTERNS#2, "COEGF8383830E0C0" ТО 99:NEXT I 
492 PATTERNS#3, “Е@Е@ЕВЕСЕВӘС@С@С" 590 PRINT :2RINT :PRINT :PRINT :PRINT 
500 REA CREATION FLAMME PRINT PRINT :PRINT :PRINT :PRINT 
510 PATTERNS#4, "2207232122000000" 780 PRINT " MISSION ACCOMPLIE" 
520 PATTERNS46, "ЕӘЕӘСӘвааааааааа@" 710 INPUT "UNE AUTRE MISSION "i$ :SOUN 
530 а=3@:3=12@:С=5@а na 
540 IF 83162 THEN 250 720 IF W$="0UI" OR Us="0" THEN RESTORE 
550 IF 8»255 THEN 8-120 :6070150 
568 SPRITE0,(8,A),0,14 230 IF US="NON" JR Ws="N" THEN END 
520 A=A+3 740 GOTO 212 
580 D=STICK(1) 250 SCREEN 1,1:PRINT :PRINT :PRINT :PR 
IF Dei THEN A=A-4: $ INT ;PRINT :PRINT :PRINT :PRINT 
26@ PRINT " VOTRE (ЕЛ EST PERDU" :GOTO 
219 " 


P d TORPILLEUR 


Une guerre secréte vient d'éclater 
dans une contrée lointaine. 
Votre président vous envoie sauver l'état des Tiltiens. 
Pour cette mission, vous allez commander 
un sous-marin nucléaire ultra-moderne. 


BUT DU JEU pas à riposter à l'aide de vos torpilles. La а l'aide des touches d'édition à droite du 
côte, toute proche, protège souventlebá- clavier. Pour lancer une torpille, pressez la 
Le quartier général ennemi se trouve à timent ennemi. barre espace. 


bord d'un torpilleur. Votre mission est de 

couler ce navire. Mais à chacun de vos ADIGUAVIER 

passages au-dessus du sous-marin, ce — - Déplacez votre sous-marin dans les qua- 

dernier vous lance une grenade. N'hésitez tre directions (gauche, droite, haut et bas) mm —_— 


19 REM Copyright TILT MICRO 

20 CLS 

30 PRINT :PRINT :PRINT :PRINT :PRINT 
PRINT :PRINT :PRINT :PRINT :PRINT :COL 
981,15 

4@ PRINT " TORPILLEUR" 


80 PATTERN Ss 2,'2000000000FF613F " 
99 PATTERN S# 1,"2001E121FIFFFFFFF" 
100 PATTERN SH 2,"@@@@@@@@С@ЕРЕЕРЕЕ" 
110 PATTERN S# 2, "000000009ЗЕЕҒЕ?Е" 
120 PATTERN SH 8, "Q0/8E8F8F8FFFFFF" 
130 PATTERN Ga 3,  @200000000FF86FC" 
140 PATTERN 5810,  2000000000BE?FBE" 
150 PATTERN 5811, "0000081СЗҒҒҒЕҒ2Ғ" 
160 PATTERN S812,"@23438FFF1FFFFFF" 
120 PATTERN 5813, "00002040ЭҒҒЕЕСЕВ" 
180 PATTERN 5414, "1838383838183828" 
198 GR-11:88-3 


50 FOR 1=1 TO 99:МЕХТ I 

60 PRINT :PRINT :PRINT :PRINT :PRINT : 
PRINT :PRINT :PRINT :PRINT :PRINT :PRI 
NT :PRINT :PRINT :PRINT 

70 REM SPRITES BATEAU, SOUS-MARIN ET 
TORPILLE 
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SCREEN 2,2:CLS 
210 Y=150:X=200 :0: 


230 COLOR 1,4, (9,923-(255,191),1. 
248 CIRCLE (210,30),15,10,1,0,1.ВҒ 
250 LINE (20,125)-(20,1912,15 

262 LINE (0,32)-(20,125),15 

270 PAINT (50,1402,11 

280 IN-0:FOR XB=2@ TO 235 STEP 8 
290 GOSUB 470 

302 KS=INKEYS . 

310 IF KS=CHRS(28) THEN A=4:B=8:0=7 
320 IF K$-CHR$(29) THEN A=-4 :В=2:0=0 
330 IF K$=CHRS(39) 4 


348 =4 
352 GOSUB 520 
зба X>238 THEN Х=Х-а 


370 IF Х<22 THEN X=X-A 
380 IF Ү>18@ OR Y<125THEN Y-Y-B 

390 S=-0:G0SUB Saa 

400 IF T=! THEN GOSUB 542 

410 IF IN-1 THEN 280 

420 IF XB»X-4 AND XB<X+24 AND IT=@ THE 
N GOSUB 640 

430 IF IT-1 THEN GOSUB 650 

440 IF DE-1 THEN DE-0:IT-0:GOTO 280 
480 NEXT 

460 GOTO 280 

470 P-Q:FOR 1=11 TO 13 

480 SPRITE I, (XBrP, 832, 1,1 

499 P=P+8 :МЕХТ :RETURN 

500 P=G:FOR I-D TO 0+2 

510 SPRITE'S,(X+P,Y),1,14:P=P+8:S=S+1: 
NEXT :RETURN 

522 BEEP:T=1:Q=Y:M=X+11:GR=GR-1 

530 IF GR-0 THEN 230 

542 Q-Q-4:SPRITE 14, СЫ,0),14,8 

IF Q»-91 THEN RETURN 


OI 1 :GOSUB Saa 
220 COLOR 1,7,(0,0)-(255,91), 1 


560 IF W>XB-2 AND W<XB+22 THEN 580 
570 SPRITE 14,(0,0),14,8:T-0:RETURN 
588 CIRCLE (4,912,10,8, 1,0; 1, BF. 

530 SOUND 4,2,12:FORI=1T0300 :NEXT :BEEP 
:SC=SC+100:IT=@ 


688 SPRITE 18, (10,10), 10,7 

612 CIRCLE (М;912,10,4,1,0,0,5,ВҒ 

620 CIRCLE (4,912,10,2,1,0.5, 1, BF 

630 SPRITE 14, (0,0),14,2:T-0:IN-1:RETLI 


RN 

640 YT=185:1T=1 :ХТ=Х+10 : SOUNDS, 1, 12:FO 
RI-1T0100:NEXT :BEEP 

652 SPRITE 19, (XT, YT), 10, 15: YT- YT*6 
660 IF CXT>X-8 AND ХТ<Х+24) AND ,CYT>Y 
AND YT<Y+8) THEN BA=BA-1 :SOUND 4,1,12 
:GOSUB 690 

670 IF CYT>=Y+20) OR CYT>=180) THEN SP 
RITE 10,(10,102,10,2:1T-0 

680 RETURN 

690 CIRCLE (X*12, Y*142,12,9, 1,0, 1, BF:FO 
RI1-1T0300 :NEXT :BEEP 

708 IF BA=@ THEN 230 

219 DE=1:SPRITE 10,(10,10),10,2 

220 CIRCLE (X*12,Y*42,12,4,1, 0; 1, BF RE 
TURN 

230 REM == FIN DE PARTIE == 

740 FOR 1-1 TO S 

250 FOR 1-150 TO 900 STEP 50 

260 SOUND 1,1,12 

220 NEXT :МЕХТ :ВЕЕР 

280 SCREEN 1,1:CLS 

790 COLOR 15,4 

800 PRINT :PRINT "SCORE FINAL :";SC 
810 INPUT "UNE AUTRE PARTIE";H$ 


820 IFW$="0UI"ORW$="0" THEN 89 
830 IF W$="NON"ORW$="N" THEN END 
842 GOTO 810 


MISSION SURVIE 


Un être humain, invulnérable dit-on, 
hante la planète. А bord de votre 


icoptére, vous 
devez détruire ce petit Km qui 
change de couleurs à mesure que ses 
forces s'épuisent. Pour cela, vous dispo» 
sez d'une quantité illimité de bombes. Ac- 
complissez votre mission au plus vite, si- 
non ce dróle d'humanoide retrouvera 


156 


hélicoptëre, vous vous lancez 
à sa poursuite. 


toute sa puissance et deviendra indes- 
tructible. 


- Pour déplacer l'hélicoptère et larguer 
des bombes, utilisez un joystick connecté 
sur le port 1 : de gauche à droite pour 


avancer ou reculer | hélicoptère à l'écran; 
vers le haut ou vers le bas pour larguer 


une bombe, méme si la précédente n'a 
pas atteint le sol. Dans ce cas, la première 
bombe disparait de l'écran. 

- A chaque fois que vous touchez à deux 
reprises l'envahisseur, il change de cou- 
leur et de plus en plus d'étoiles apparais- 
sent. 


| 19 REM COPYRIGHT TILT MICRO 


20 CLS 

PRINT :PRINT :PRINT :PRINT :PRINT :PRI 
NT :PRINT :PRINT :PRINT:PRINT:COLOR4; 1 
S:PRINT " nj 

SQ PRINT CHRS(249);:8-&*1:1F8 O20 THEN 


60 PRINT " SH 

7@ PRINT" “3 PRINT CHR$(249) 
3:PRINT " "j PRINT CH 
R$(249) 

80 PRINT " "j:PRINT CHR$(249 


);:PRINT CHR$(253);:PRINT " MISSION SU 
RUIE "j:PRINT CHR$(253);:PRINT CHR$(24 
9); 

90 PRINT " “33PRINT C 
HR$(249);:PRINT " RUD 
PRINT CHR$(249) ; PRINT Y 


j 
100 PRINT CHR$(249);:B=B+1:IF B<>20 TH 
EN 188 

11@ PRINT :PRINT :PRINT :PRINT :PRINT 
:PRINT :PRINT :PRINT :PRINT :PRINT :PR 
INT :PRINT :PRINT 

120 REM LOGO TILT 


130 PRINT " KHKHHKK ЖЖ ЖЖ ж 
хаж" 

140 PRINT " Dn XX xx 

ant 

150 PRINT " ## XX жж 

нн" 

160 PRINT " ## ЖЖ ЖЖЖЖ 
ann 


170 REM FIN DE Lñ PRESENTATION 

180 FORI-1TO15 

190 SOUNDS, 0, 15 :FORL-5TO25 :NEXT : SOUNDS 
31,15 

200 NEXTI : SOUNDA 

210 SCREEN 2,2:С1.5:2-6:5-14:Н-4 

220 КЕМ CREATION DU DECOR 

230 COLOR1,;1, (0,0)-(255,140),14 

240 COLOR2,2,(0,140)-(255,191),14 

250 LINE (0,140)-(255,140),12 

260 FOR 1=0 TO 5@:A=RNDC1)*131+1 :B=RND 
C1)X255*1:PSET (BA); 15 :NEXT I 

270 CIRCLE(219, 232,10, 15, 1,0, 1, BF 


280 REM CREATION DU SPRITE HELICOPTERE 
290 PATTERNS#0, "200OQOFFO63F2F91" 


300 PATTERNS, "91912FO8C827F 0000" 

310 PATTËRNS#2, "2200QQGFCOQGCOE 1 F9" 

320 PATTERNS#3, "FFF1E14040F20000" 

330 REM CREATION DU SPRITE BOMBE 

340 PATTERNS#4, "Q07DFF 2D20000000" 

350 MAG1:SOUNDS, 3, 15 :A=255 :8=160 :C=70 : 
E=0:F=0 

360 SPRITE?; (B; C), 0, H 

370 REM CONTROLE JOY-STICK 

380 REM DEPLACEMENT ET BOMBE 

390 D=STICK(1):IF D-10RD-5 THEN Е-В:Ғ- 
C+15:G=1 

400 IF D-2 THEN В=В-1@ 

410 IF D=3 THEN В=В+1@ 

420 IFG-1 THEN E=E+2:F=F+5 

430 IF Е>255 OR Ғ>191 THEN G-0:E-0:F- 
d 1 


720 


30 REM PRESENTATION DU JEU 
40 PRINT :PRINT :PRINT :PRINT :PRINT 
440 SPRITE4; E; F2),4,11 

450 REM. SPRITE DU BONHOMME 1 

460 PATTERNSY8, "0888488881888101" 

470 PATTERNS#9, "0301000005020000" 

482 PATTERNS#10, "вавагасесасасоға" 

490 РАТТЕКМ5#11, "DOEOCOCO4040CO00" 

500 5РКІТЕ1;(8;1602,8,5 

510 REM CONTROLE DE DESTRUCTION ВОМНОМ 
ME 

520 IF ABSCE-A) <7 AND ABSCE-A)>@ AND A 
В5(Ғ-160)<7 AND RBSCF-160)»0 THEN Welt 
1:500№05,8, 15:FORI-1TO15:NEXT I:GOTO 6 
20 

530 REM SPRITE DU BONHOMME 2 

540 PATTERNS#12, "2200000000000000" 

550 PATTERNS#13, "2001000000000000" 

560 PATTERNSh14, "аааааавакававак@" 

522 PATTERNS#15, "FOFOFO606060E 000" 

582 SPRITE1,(ñ-1,160),12,S 

590 A=A-6:1F ñ<@ THEN A=255 

бда GOTO 360 

610 КЕМ CHANGEMENT DES COULEURS JEU 
620 IFW=9 THEN 680 

630 IF W=2 THEN 2=4:S=8:H=? 

640 IF W=4 THEN 2-10:$-12:H-8 

650 IF W=6. THEN 2= 
560 IF W=8 THEN 2-13 a 

670 SOUNDS, 3,15: :G=0:GOTO 220 
680 SCREEN 1,1:PRINT :PRINT :PRINT :PR 
INT :PRINT :PRINT :PRINT "MISSION ñCCO 
MPLIE" : SOUNDA h 
692 REM AUTRE PARTIE 

282 CLS 

710 INPUT-"UNE AUTRE PATIE ?" ;1% 
OUI"ORMS$="0" THEN 10 
NON"ORMS="N" THEN END 


730 


740 GOTO 210 


G 


ч Les amateurs du jeu de stratégie 
retrouveront ici un classique du genre. Une maniëre comme une autre 
de garder les pieds sur terre. 


BUT DU JEU 


Vous devez remplir avec les pions de votre 
couleur l'échiquier, sans oublier que l'or- 
dinateur poursuit le mëme but. En encer- 
clant ləs pions adverses, ces derniers 
changent de couleur. Mais soyez sans 


crainte, Yeno, votre trës aimable adver- 
saire et arbitre, veille à tout. П est donc en 
mesure de corriger vos erreurs de dépla- 
cements. , 


- Donnez votre prénom, ensuite choisis- 


E 1@ REM COPYRIGHT TILT MICRO 
2@ CLS:COLOR 1,12 


sez une couleur de pions noirs ou blancs. 
- Entrez les déplacements grâce à une let- 
tre et un chiffre qui (o E respec- 
tivement à l'abscisse et à l'ordonnée du 
point choisi. L'ordinateur s'occupe du reste. 


222 
280 


30 PRINT :PRINT TABC14) ; "OTHELLO" 

40 PRINT :PRINT :INPUT "Uotre prenom:" 
jNM$:IF LEN(NMS)»9 THEN 6 

50 CLS 

ва DIM (22) :CP=4 :PO=2:PM=2 

28 DIM K0C12,12) 

80 CURSOR 21,5:PRINT "YENO":CURSOR29,5 
:PRINT NMS 

90 FOR 1-1 TO 64:READ C,D:A(C)=D:NEXT 
100 CHS=CHRS(229) 

110 FOR 1=9 TO 18 

120 CURSOR 1,9:PRINT CHS :CURSOR I,18:P 
RINT CHs 

132 CURSOR 9,I:PRINT CHS :CURSOR 18,1:P 
RINT CH$ Y 
140 NEXT :CURSOR 10,8:PRINT "ABCDEFGH" 


150 FOR 1=10 TO 17:READ C$:CURSOR 8,1: 
PRINT C$:NEXT 

160 CURSOR 13,13:PRINT CHR$(235) jCHRSC 
236):CURSOR 13,14:PRINT CHR$(236);CHRS$ 
(235) 

170 КОС13,13)=1 :KOC14, 13)-4:K0(13, 142- 
4:К0С14,14)=1 

180 КЕМ === DEPART 
190 GOSUB 1650 
200 INPUT “Prenez-vous les noirs (0/4) 
pe 

210 IF R$4»"O" AND R$<>"N" THEN 190 
220 GOSUB 1660 

230 IF R$-"O" THEN POS-CHR$(236) :P0-4 : 
P1$-CHR$(235) :P1=1 :GOTO 250 

240 P1$-CHR$(236) :P1-4:PQS-CHRS(235) :P 


292 GOTO 250 
300 REM === 
310 GOSUB 1660 


320 POS-STRSCPO) :PMS=STRS(PM) 


330 CURSOR 21,2:PRINT " "CURSOR 29, 
2:PRINT " ":CURSOR 21,2:PRINT Р08:СЦ 
RSOR 29,2:PRINT Pris 

340 IF PM+PO=64 THEN 1480 

350 R=@ 

362 IF РО-й OR PM=Q THEN 1480 

320 GOSUB 1650:1NPUT "Ou jouez-vous:"; 
C$:GOSUB 1660 

380 IF C$-"JE PASSE" THEN 520 

390 IF LENCCS)<>2 THEN 195 

400 GQ$-MID$CC$; 1,1) 


419 THEN 0: 492 
420 THEN Q 490 
430 THEN Q 490 
442 THEN Q 490 
45@ THEN Q 490 
460 THEN Q 490 
470 THEN Q 490 
480 Н" THEN Q=? 


490 W=UAL (MIDS (C8, 2, 122 :4-8-U 

508 0-0*10:u-1*10:6P-KOCQ; W) 

510 IF AP<>@ THEN Заа 

520 CURSOR G,W:PRINT Ра$:РМ=РМ+1 :KOCQ, 
М)=РӘ 

530 XI=Q:YI=W:P$=PØ$ :P=PO:AD=P1 


540 SB=3 
550 GOSUB 820 
560 IF R THEN 141@ 


522 КЕМ SEGA === 


9-1 580 IF РО=@ OR РМ=0 THEN 1480 

250 CURSOR 22,9:PRINT P1s:CURSOR 39,9: 590 IF РО+РМ=64 THEN 1482 

PRINT P0$ 600 PO$=STR$(PO) :PM$=STR$(PM) 

260 IF R$-"O" THEN 399 810 CURSOR 21,2:PRINT." “:CURSOR 29, 
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" :CURSOR 21,2:PRINT POS CU 
RSOR 29,2:PRINT PMS 

620 RESTORE :MP=-13:10=0:F0=0 

630 10-8 

640 GOSUB 1658:PRINT "Un instant, je те 
Flechis..,." 

650 FOR 0-1 TO 64 

660 READ C,D 

620 X-INTCC/18) :Ү=С-Хж10 

680 Х=Х+10:Ү=Ү+10 

= IF KOCX,Y)<>P1 THEN NEXT O:GOTO 24 
200 XI=X:YI=Y:P$=P1$:PsP1:ñD=P0 

710 SB=5 

222 GOSUB 828 

230 NEXT 0 

740 IF. 10-0 THEN PRINT "JE PASSE" :ВЕЕР 
2:FORI=1T0100 :NEXT :G0TO300 

250 GOSUB 1660 :CURSORXO, YO:PRINT P1$:F 
:0=1:X1=X0 :YI=YO :KO(XO, YO)=P] 

760 GOSUB 1560 

222 GOSUB 1650 :ВЕЕР:РЕІМТ "JE JOUE EN 
"38J$ :PRINT 

280 PO=PO+1 :KO( XO, YO) -P1 

292 SB-3: 60508 820 

800 GOTO 300 

810 END 
820 REM 
830 A=0: 
10:GOTO 850 

840 GOSUB 1300 

850 А=1:В=-1:Ғ=0:1Ғ SB=3 THEN GOSUB 10 
10:GOTO 820 

860 GOSUB 1300 

870 А=1:В=2:Ғ=0:1Е 58-3 THEN GOSUB 101 
9:GOTO 890 

880 GOSUB 1300 

890 А=1:В=1 :F-0:IF SB-3 THEN GOSUB 19 
10:60Т0 910 
900 GOSUB 13 
910 8-0:8-1:F-0:IF SB=3 THEN GOSUB 101 
0:GOTO 930 

920 GOSUB 1300 

930 ñ=-1:B=1 :F-0:IF SB-3 THEN GOSUB 1 
019:50Т0 950 

940 GOSUB 1300 

850 А--1:В-й :F-0:IF SB-3 THEN GOSUB 
910:GOTO 922 

960 GOSUB 1300 

920 ñ=-1:B=-1 
012:50Т0 992 
988 GOSLB 1300 

990 IF R=@ AND P=P@ THEN 1410 

1000 RETURN 

1010 REM === SUB.RETOURN. === 

1020 X-XI:Y-YI 

18030 X=X+A:Y=Y+8 

1040 IF X>12 OR Y>12 OR X410 OR Ү<12 T 
НЕМ RETURN 

1050 S=KOCX; Y) 

1060 IF Ғ-й AND S-P THEN RETURN 
.1020 IF 5-2 THEN RETURN 

1080 F=F+f 

1090 IF F>=1 AND S=? THEN GOSUB 11208 


2:PRINT " 


RETOURNEMENT === 
1:F70:IF SB-3 THEN GOSUB 10 


IF 58-3 THEN GOSUB 


1102 IF S=AD THEN 1930 
1110 RETURN 

1120 REM === RETOURN. ECRAN === 

1130 R=1 

1140 Nei re) 

115@ FOR 1=1 TO F-1 

1160 X=X+ñ:Y=Y+B 

1178 GOSUB 1660:CURSOR X,Y:PRINT PS 
1180 IF P$=P@$ THEN РМ=РМ+1 :РО=РО-1 :KO 
(Х,т)=Р@ 

1190 IF P$=P1$ THEN PO=PO+1:PM=PM-1:KO 
(X,Y)=P1 

1200 NEXTI :F=0 :RETURN 

1210 DATA 8,16, 18, -4, 20, 4, 30, 2, 40, 2, 5 
14,560, -4,70,16 

1222 DATA 1,-4,11,-12,21,-2,31,-2,41;- 
2,51,-2,61,-12,21,-4 

1232 DATA 2,4,12,-2,22,4,32,2,42,2,52 
4,62,-2,22,4 

1240 DATA 3,2,13,-2,23,2,33,0,43,0,53, 
2,63,-2,73,2 

1250 DATA 4,2,14,-2,24,2,34,0,44,0,54, 
2,64,-2,24,2 

1262 DATA 5,4,15,-2,25,4,35,2,45,2,55, 
4,65,-2,75,4 

1222 DATA 6,-4,16,-12,26,-2,36,-2,46,- 
2,56, -2,66,-12,76,-4 

1280 DATA 2,16,127,-4,22,4,32,2,42,2,52 
,4,62,-4,22,16 

1290 DATA 8,7,6,5,4,3,2,1 

1302 REM SUB. SEGA 
1310 Х-ХІ 
1320 х=х+б: 
1330 IF Х<10 OR Ү<12 OR X>17 OR Y212 Т 
НЕМ RETURN 

1342 S=KOCX, Y) 

1350 IF S=@ AND F=@ THEN RETURN 

1360 IF S-P THEN RETURN 

1322 F=F+i 

1380 IF S=AD THEN 1320 

1390 IF S=@ AND r»à THEN GOSUB 1420 
1400 RETURN 

1#19 GOSUB 1652:PRINT "ILLEGAL" :GOSUB 
1662:CURSOR ХІ, YI:PRINT " ":PM=PM-1 :KO 
(X1, YID=@:GOTO 300 

1420 REM === EVALUATION SEGA 
1430 РТ=РМ+РО 

1442 10-1 

1452 б-Х-12:н-Ү-10:0-бЖ10%н 
1462 IF ñ(D)>HP THEN MP=ACD) :ХО=Х :YO=Y 
:MF=F 

1420 RETURN 

1480 REM === GAGNANT 
1492 POS=STRS(PO) :PMS=STRS (PM) 

1502 CURSOR 21,2:PRINT "  ":CURSOR 29 
S2GPRINT " = " :CURSOR 21,2:PRINT POS :C 
JRSOR 29,2:9RINT PS 

151€ IF PO>PM THEN Fs-"SEGA SC-3000" 
1520 IF PH>PO THEN Fs-Nris 

1530 IF PO=PH THEN CURSOR 16,24 :PRINT 
"EGALITE229":END 

1540 CURSOR 4,22:PRINT "URINQUEUR:";F$ 
1550 END 

1560 IF Х0-12 THEN Xs="a" 


1630 IF Х0-12 THEN X$-"H' 

1640 YO-18-YO:YS-STRSCYO):8J$-X$* YS RE 
TURN 

1650 CONSOLE 9,3,1,2:CLS:RETLIRN 

1660 CONSOLE @, 24, 1, @ :RETURN 


BOMBER 


Le système solaire ne tourne pas rond. 
Artificier de l'espace, vous devez 


désamorcer la bombe qui 
menace de tout désintégrer. 


BUT DU JEU énergie, veiller aux deux mines qui seront AU CLAVIER 
désormais pour votre vaisseau, symbole 


Vous êtes en orbite autour du soleil, ainsi de destruction totale. Au clavier : 
que cette «fichue» bombe que vous devez - «J» éloigne du soleil 
désamorcer. Tout en conservant votre - «L» vous rapproche du soleil. 


m 


5 CLS : GO SUB 300: PRINT AT 11,16;CHR% (144) 

1й LET хаб: LET YD=5: LET M-INT CRNDX8): LET Nei: LET YM-M: LET ИМЕН: LET MEN 
: LET 25: LET ҮшХ: LET MBeX: LET ҮВ=Х: LET E-S88: LET Т=й 

15 LET DB=S+INT СЕМ0Я5): LET D--DB 

48 LET МеМғ,2: LET MeM+CABS C10-D)/10): LET R&eINKEYS: IF Ag="J" AND 02-9 THE 
: LET Е=Е-1 
L" AND D<9 THEN LET D=D+1: LET E=E-10 

THEN LET DE-DE*RND: IF DB>=10@ THEN LET DE=(RNDX3 +1 

55 LET 1=X: LET YizY: LET Х2=ХВ: LET X3=XM: LET W4-MD: LET Y2-YB: LET Y3=YM: 
LET Y4=YD 

56 LET Үз11-ІНТ (SIN ¢MD%D 

58 LET X=16-INT ¿COS CH) з 

ep LET XB=16-INT (608 CNOXDB): LET YB=11-INT (SIM CM)#DB): LET YM=INT CYBZ1,2) 
+ LET XM=-%B: LET YD=YB-INT CYB/39: LET XD=INT CXBz1.1? 

62 IF Y=11 AND ABS <Х-163<2 THEN GO TO 220 

66 IF Y=YB AND ABS (X-MB)2 THEN GO TO 200 

69 PRINT AT Y1,X1;" M: PRINT АТ Y2,X2;" ": PRINT RT Y3,X3;" ": PRINT AT Y4,X4 

T8 PRINT INK 3:AT ҮВ,ХВ;СНЕФ (145): PRINT INK 1;RT Y,X;CHRS (146);CHR$ (147): 
PRINT ІМК 2;RT YM: М: "+": PRINT INK 2;RT YD, XD; "+" 

2 IF Y=YD AND ABS CX-XD3<2 THEN GO TO 220 

74 IF Y=YM AND ABS <Х-ХМ2<2 THEN GO TO 220 

88 LET T-T«1: LET E-E-1: PRINT INK 6;RT 4,8: "ENERGIE : ";E;" ": IF EXB THEM G 
о TD 226 

99 GO TO 40 

200 PRINT FLASH 1; INK 4;AT 21,2;"DESRMORCRGE EM ";T;" SECONDES": GO TO 258 
220 FOR. A=@ TO 7: PRINT INK A;AT Y,X/CHRS (146);CHR& (147): PAUSE 5: BEEP .2.A: 
МЕХТ ñ 

250 INPUT " UNE AUTRE PARTIE ? ";Е®: IF R#*="O" THEN GO TO 1 

299 GO TO 598 

388 RESTORE : FOR Н=й TO 31: READ V: POKE USR "A"+A,Y: NEXT Н: RETURN — + 

310 DATA 8,42,30,127,30,42,8,0,0,0,0,121,255,121,0,й,8,1,3,15,63,250,28,й,3,135 
.79,255, 226,255, 12, 255 
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es HELICOS 


Voilà une île qui n'est pas de tout repos. 
Entre la nature indomptable 
et un ennemi belliqueux, il vous faudra piloter 
bien habilement pour sortir vivant 


de ce 


guépier 


dangers maritimes, les vents rabattants, Pour deux joueurs : 
les mines anti-gravité (on n'arrête pas le - Joueur 1 
progrès) et bien sür l'ennemi omniprésent P pour monter 


BUT DU JEU s] qui ne vous pardonnera aucune erreur. L pour larguer les mines. 
т т 5 T = E AUCLAVIER  —  ] CLAVIER Pour descendre 
Faites évoluer votre appareil en évitant les - Joueur 2 : 


Z pour monter 
S pour larguer les mines 
X pour descendre 


": NEXT ñ 


5: LET N=M: LET х=М: LET Үшх 


THEN LET H1=1 
AND M>2 THEN LET H2=-1 
THEN LET H2=1 


69 PRINT RT Y,%;" ": PRINT RT M,N;" 
62 IF %<1 THEN LET Х=З@ 
64 IF H>30 THEN LET Hp 
о TO 218 
# C147): GO TQ 5a 
288 LET Мех: LET Hey 
F R$="0" THEM GO TO 1 
228 GO TO 404 


7.252.128, 118, 190.255, 255, 32.248 


1 BORDER @: PAPER 5: BRIGHT 1: IHK 6: 

28 FOR A=18 TO 21: PRINT BRIGHT 1; INK 1; PAPER 1;RT R,8;" 
@ 
5 


66 IF Ү=М AND ABS CM-N)2 THEN GO TO 210 
6? LET T1=ATTR ©М,М+1›: LET T2=RTTF <Y.MX): IF T1=73 OR T1=104 OR T1=106 THEN G 


68 IF T2=73 OR T2=104 OR T2=106 THEN GO TO 200 
7A PRINT INK 1;RT Y,%;CHR% (144) CHRE (145): PRINT INK 3;AT М,М;СНЕ% ¢ 146); CHR 
210 PRINT FLASH 1; INK 2;RT M, N-1; "BOUM": INPUT " UNE AUTRE PARTIE 7 ";R#: I 


300 RESTORE : FOR Ней TO 21: READ V: POKE USR "A"+A,4: NEXT A: RETURN 
216 DATA 62,1. 57, 125,255, 255, 9, 63,248, 0,0, 1, 227, 255, 3, 129, 31, 128, 192, 240, 63, Y. 1 


LET Үз10: CLS : GO SUB 394 


38 FOR Re48 TO 210: LET Y=Y+INT CRNDE93-4: IF Y<@ THEM LET =A 
35 PLOT BRIGHT 1; INK @;ñ,32: DRAM BRIGHT 1; INK @;0,+Y : NEXT A 


IF A$="0" AND Ү>2 THEN LET H1=-1 


THEN PRINT INK 2;RT M+1 N; "ж" 
58 IF A$="K" THEN PRINT INK 2;RT Y+1. 3; "x" 


": LET ХаХ-1: LET N=N+1: LET M=M+H2: LET 


CARS 


Sur ce circuit d'enfer, 
de nombreuses surprises vous attendent. 
Surtout, ne perdez pas les pédales. 


H 


BUT DU JEU tir les autres concurrents. Autre obstacle : AU CLAVIER 
- le circuit se fait, au fil des kilomëtres, de 
Parcourir le maximum de kilomètres tout plus en plus étroit. - Déplacement vers la gauche : «J» 
en évitant de sortir de la piste et d'embou- - Déplacement vers la droite : «L» 


1 BORDER à: PAPER 4: INK 4: CLS : GO SUB 200 

18 LET 4-13: LET L-18: LET T-18: LET Мей: LET K=D 

20 FOR А=8 TO 21: PRINT INK &;RT А, 18;"!"; TAB C285;"!": NEXT ñ 

48 LET Май: LET AS=INKEYS: IF A$="J" THEN LET H--1 

45 IF A$="L" THEM LET Hei 

58 PRINT AT 9,K;" ": LET W-X*N: IF ATTR C18,X5«»6 THEN GU TO 188 

64 PRINT INK 1;RT 18,X;CHR$ (1445 

75 LET T=T-1+INT CRNDX35: IF T+L>31 THEN LET T=31-L 

Т? LET K=K+1: POKE 23692,255: IF T<=0 THEM LET T=1 

88 PRINT INK 1;RT 21,10: PRINT INK 1;TRB CTD; ІМК 6;"!"; 
нін: IF CKÁ^SBSINT (K750) AND L>=3 THEM LET L-L-1 

85 IF RND>.8 THEM PRINT INK 2;RT 29, T+ RNDXL 2: CHRS (145) 

98 IF RHMD».? THEN PRINT INK 4;RT 21,T*CRHDXLO;CHRS (1465 


: PRINT INK &; TRB <T+L 


93 GQ TO 40 
100 BEEP .3,5: PAUSE 100: PRINT FLASH 1; INK 4;RT 4,3;"VOUS AYEZ PARCOURU "Ku" 
Km": INPUT " UNE AUTRE PARTIE 7 ";R$: IF R$="0" THEM GO TO 1 


118 GO TO зай 

200 RESTORE : FOR Н=й TO 23: READ V: POKE USR "R'-R,V: NEXT ñ: RETURN 

218 DATA 231, 126, 60, 26, 36, 126, E0. 24, 24, 60, 126. 102, 60, 60, 255, 231, 60, 126,231, 36.3 
6, 60,255,219 


<| | HOP HOP 


Aïe, Aïe, Aïe, que de monde sur votre moniteur ! 
Parmi ces invités inopportuns, 
se glissent certains monstroïdes qui ont une fâcheuse tendance 
à vous considérer comme faisant partie intégrante 
du menu de la soirée. 


BUT DU JEU bleu-clair. Un conseil : prenez garde, de - Déplacement à droite : «L» 
plus, au cadre du jeu. - Déplacement vers le haut : «W» 


Résistez le plus longtemps possible à vos - Déplacement vers le bas : «X» 
nombreux adversaires, en les évitant afin AU SEAVER - Télétransportation : «К» 
de pouvoir déguster les petites bouteilles - Déplacement à gauche : «J» 


1 BORDER @: PAPER Ø: INK 6: CLS : GO SUB 294 

19 LET Мей: LET Мей: LET Х=16: LET Y=9: LET Sep: LET XM=INT СЕМОЖ29›+1: LET ҮМ 
=INT ©ЕНОЖ18›+1 

20 LET S=" wwwws<ssr PRINT INK 2;AT 21.0,5%: PRINT ІН 
GE й,0;5%: FOR Ней TO 21: PRINT INK 2;RT F,0;"N": PRINT INK ZAT Я, 31; "M": 
SE FOR A=1 TO 2@+СЕНОЖ2@›: PRINT INK 1AT (RNDE1B8*1,CRNDX292*1; CHR& (1472: ME 

48 LET НФ-ІМКЕҮ%: IF A$="J" THEM LET N--1: LET Мей 

42 IF A$="L" THEN LET Nei: LET Мей 
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44 IF A$="W" THEN LET М=-1: LET N=@ 
46 IF H-"X" THEN LET М=1: LET H=0 
47 IF A$="K" THEN PRINT RT ү," ": LET X=INT (RHD*295*1: LET Y=INT (RNDÉ18)*1 
48 PRINT AT Y.X;" ": PRINT AT YM,XM;" ": LET Sea: LET Y=Y+M: LET C=ATTR CY, X 
A IF C=5 THEN LET S=S+10: BEEP .1,1: GO TO 50 
49 IF C<>6 THEN GO TO 300 
&8 PRINT RT Y.;X;CHR (144): GO SUB 240: PRINT INK 3;RT ҮМ,ХМ:СНЕФ (145): IF RH 
D>.34 THEN PRINT INK 5;RT CRNDX182*1,CRNDX29)*1;CHR$ (146) 
Эй IF Veit AND YM=Y THEN GO TO 300 
95 PRINT INK 4:AT 21,18;"SCORE : ";S: GO TO 40 
200 RESTORE : FOR Ней TO 21: READ V: POKE USR "R"+R,V: NEXT A: RETURN 
210 DATA 68.126.219,152,255,189,195.126,60,126,219,189,255, 195, 123, 255, 60, 24, 60 
: 126,126, 126,68, 24,56, 15, 124, 198, 198, 40, 40, 198 
248 IF RND9.6 THEM RETURN 
241 IF ХУХМ THEM LET ХМ=ХМ+1: RETURN 
245 IF Y»YM THEM LET YM=YM+1: RETURN 
258 LET WM-xM-1: LET YM=YM-1: RETURN 
SCH BEEP .2,5: PAUSE 199: INPUT " UNE AUTRE PARTIE 7 "RẸ: IF Е%="П" THEN GO 
1 2 


Р CRASHTOWN 


Dure corvée que d'éviter les radars 
quand on est pilote de ligne en temps de guerre. 
Il faut voler еп rase-mottes 
et la ville que nous allons devoir traverser devient 
un danger permanent pour nos passagers. 


CHER i 
Zu iunii ISS 
bonnes surprises, et faites ainsi le maxi- - W pour la basse altitude 
BUT DU JEU mum de kilomètres. - J pour aller à gauche 
Évitez les grands buildings si fréquents [ AU CLAVIER ] - L pour aller à droite 
dans nos villes modernes. Frólez les im- - 
meubles bas, ils vous réserveront de - Q pour la haute altitude 


1 PAPER 4: INK 4: PRINT : BORDER 4 
19 GO SUB 300: LET Кей: CLS : LET Мей: POKE 23692,255: LET K=15: LET С=2йй: LE 
T H$="HAUTE" 
48 POKE 23692,255: LET М=@: LET НФ-ІМКЕҮ%: IF A$="W" THEN LET H$-"HRUTE": LET 


C=C-24 
X" THEN LET H$-"BRSSE" 

J" THEN LET M=-1 

45 IF A$="L" THEN LET M=1 

58 LET C=C-1: PRINT AT @,29;" ": PRINT RT 8,0; "ALTITUDE: ";H$;" ESSENCE: ~" 
iC: IF C<=Ø THEN GO TO 288 

55 PRINT RT 9,X;" ": LET x-X«M: IF HS-"BRSSE" THEN GO SUB 178 

ep PRINT INK 1;RT 18,X;CHR$ (159): GO SUB 158: LET K-K*1: GO TO 39 » 
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( 158 LET T=INT CRHDX?»*1: IF T23 THEN PRINT AT 21,0)" ": PRINT : RETURN 
155 LET Р«ІМТ <ЕМОЖ182%?: IF T<3 THEM PRINT AT 21,P; : PRINT : RETURN 
160 PRINT RT 21,Р; "Ш ": PRINT : RETURN 
178 LET D=RTTF c18,X5: LET F=ATTR (10,%-12: IF D=44 OR F=44 THEN LET C=C+16: RE 
TUEH 
180 IF D=40 AND Р=26 THEN GO TO 200 
198 RETURN 
209 PAUSE 1880: CLS : PRINT AT 8.2;"VOUS AVEZ PARCOURUT ";K;" Km": PRIMT RT 12,5 


i"une autre Partie 7" 


220 LET ЕФ-ІМКЕҮФ: IF К%="П" THEN GO TO 1 

238 IF R$="N" THEN CLS GO TO 488 

рай GO TO 228 

300 RESTORE : FOR ñ=0 TO 7: READ D: POKE USR "P"+A;D: NEXT A: RETURN 

314 DATA 56,16,16,254,108,56,16,16 = 


METEOR 


Nous sommes en 3130. 
La couche atmosphérique qui protégeait si bien notre monde 
est aujourd'hui bien mince. 
Depuis quelques siècles, un nouveau métier à risque 
est né : briseur de météores. 


Interceptez les bolides cosmiques avant 
qu'ils ne s'écrasent violemment au sol, in- 
cendiant de ce fait les cités humaines. 
Votre but consistera également à parer 


aux divers foyers d'incendie à l'aide de vo- 


tre engin élaboré. 


AU CLAVIER 


- Déplacement vers la gauche : «5» 
- Déplacement vers la droite : «D» 


10 CALL CLEAR 190 CALL CHAR(140,'lO187C3FOTO4F |389 60508 400 
20 CALL SCREEN( 15) SEA) 390 GOTO 500 

30 CALL COLOR(13,2,1) 292 CALL CHAR(141,*A5A581993C7E7 | 400 AA=LEN[VÍ) 

40 CALL COLOR(14,2,1) Е1В') 410 FOR BA=0 TO AA 

50 CALL COLOR (15,991) 210 CALL CHAR(142,'0000182442FF* | 420 EA=1+BA 

60 CALL COLOR(I6s 16,1) 1 430 IF AACEA THEN 490 

70 CALL CHARLI28,'183CFFFFFFFFFF | 222 CALL CHAR(144,'A5A581993C7E7 | 440 U$=SEG$(V$, EAS AA) 

FF“) E18) 450 CA=ASC(U$) 

80 CALL CHAR(129,'18183C3C7E7EFF | 230 CALL CHAR(145,"4940091C1C5DF | 460 FA=IA+BA 

FF') DFF') 470 CALL HCHAR(JAsFAsCA, 1) 

90 CALL CHAR(130,'FFFFC3C3C3FFFF | 249 CALL CHAR(146, "FFFF7722') 480 NEXT BA 

FF) 250 CALL CHAR(147,*7E7E7E7F7E7E7 | 490 PFTURN 

100 CALL CHAR(131,'80COEOFOF8FCF | ЕТЕ") 500 V$sCHP$(129)60$60$50$40$4CHR. 
ЕРЕ") 260 CALL CHAR(152,'002139307FFF* | $(129)вСНВ$(128)&0$&0$&0$&П$БСНЕ 
110 CALL CHAR(I32, 'FFETC3RIRIBI8 |) 4 $(128) EOFECHRS( 124) 

1FF') 270 CALL CHAR(153,'TOF8FCFFFFFF* | 510 JA=19 

120 CALL CHAR(133, '0103070F1F3F7 |) 520 IA=11 

FFF") 280 CALL CHAR(154,"A5A581993C7E7 | 530 50508 400 

130 CALL CHAR(124,'9999FFFFFFFFF | Ғ18!) 549 EE 

БЕР!) 290 CALL CHAR(155,*7E7E7F7E7E7E7 | 550 V$-CHR$(130)40$40$40$A0$ АСНА 
140 CALL CHAR(135,*FFFFFF1P18181 | Е?Е") $(130)60$6C HR$ C133) EXSECHRÉCI31) 
818*) 302 CALL HCHAR(L,8, 146, 13) EOSECAR$( 134) ECHR$CI36)ECHRÉLI34 
159 CALL CHAR(136,'FFFFFFFFFFFFF | 310 O$=CHR$(32) ) 

FFF") 320 RSA tum) 560 JA=20 

160 CALL CHAR(137,'03070F1ATFTF' | 330 V| ЖЫНЫН ТЫНАДЫ 570 1А-11 

) у &0$50$5н$ўан 580 GOSUB 400 

170 CALL CHAR(I38,'COEOFOSBFEFE' | 340 JA-10 590 Y$=CHR$(130)&CHR$(13014CHR$( 
) 350 IA=7 130) 

189 CALL CHAR(139,*070F1EOFOF30F | 360 GOSUB 490 600 VbeCHR$ (133) ECHRÉ (131) ECHR$( 
OFF") 370 ЈА=11 129) 40$8CHRH( 133) AX$4X$40$4Y $4CH 


- Pour relácher les météores interceptés : 
appuyez sur «X». 
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R$(130)80$&CHR$(130)8CHR$(135)6C 1219 IF X(K)<7 THFN 1300 1832 IF C(K)=144 THEN 1940 


HRS(130) 122) IF 27<X(K) THEN 1300 1842 CALL HCHAR(14,X(K),32,1) 
610 JA-21 1239 IF X(K)-11 THEN 1300 1852 IF FF(GK)€)1 THEN 1890 
620 IA-8 1242 IF 4 THEN 1300 1860 PIS=PTS+10 

630 GOSUB 400 1252 IF X(K)421 THEN 1270 187) FEU-FEU-1 

640 V$eYSEOSECHRE (132) CHR $( 1321 1269 IF X(K)€24 THEN 1390 1880 CALL HCHAP(LIS,X(K) 22,1) 
4CH1$(136)40$ 4C HR$( 130) 4CHR$(135 | 1270 IF LIK THEN 2020 1890 1(К)-0 

JECHR$ ( 135) CCHRÉ(L30) 1289 IF 1 (К)=10 THEN 2080 1900 X(K)-0 

650 JA=22 1290 IF L(K)=11 THEN 2070 1910 C(K)-0 

660 [A-8 1200 IF LIK)4)13 THEN 1590 1920 к-0 

670 GOSUB 400 1319 IF I*5€X(K) THEN 2030 1932 GOTO 2090 

680 PTS=0 1322 IF X(KICI-4 THEN 2030 ELSE | 1949 CALL HCHAR(LI,X(K),145,1) 
690 SC=3 1359 1959 IF FE(UKI=1 THEN 1890 
700 OPTION BASE 1 1339 IF [#24X(K) THEN 2030 1960 FE(GK)=1 

710 GK=XIK) 1349 IF X(K)€1-1 THEN 2030 ELSE | 1979 FFU-FFU*1 

720 DIM FE(321 1489 1982 GUTO 1890 

130 RANDOMIZE 1359 IF C(K)Q3141 THEN 1330 1990 CALL HCHAR(I4,X(K) 432,1) 
740 FEU=0 1360 FOR E-0 TO 8 222) IF C(K)CD144 THEN 1890 
750 IF O€SC THEN 780 1379 CALL HCHAR(12,1,137,1) 201) PTS-PTS«15 

760 CALL KCUY(5,NN STATUS) 1389 CALL HCHAR(12,(1#1),138,1) | 2022 GOTO 1890 

770 IF STATUS€)O THEN 10 ELSE760 | 1399 CALL HCHAR(I2: I, 139, 1) 293) IF L(K)-0 THEN 1200 

780 Si 149) CALL HCHAR(12,UI*11,140,1) | 2049 IF X(K)=0 THEN 1200 

790 I=17 1410 NEXT E 2052 ZALL HCHAR(L(KI »X(K1432,1) 
800 CALL HCHAR(I241, 137,1) 1420 CALL НСНАР(12,1,32,64) 2060 IF L(K)-9 THEN 2080 

810 CALL HCHAR(I2s(I*1)5138, 1) 1630 L(K)-0 2079 CALL HCHAR((L(K)+1),X(K),C( 
820 CALL HCHAR(24, 13,32, 3) 1440 Х(К)=0 Kt 

839 CALL HCHAR( 24,13, 142, 5C) 145) C(K)=0 2280 L(K)=L(K)+1 

840 V$="FEU" 1469 K=0 2099 CALL KEY(5,Ne STATUS) 

850 JA=24 1870 GOTO 750 2102 IF М6)83 THEN 2150 

:860 IA=16 1480 IF G=2 THEN 1500 2110 IF I=1 THEN 2090 

870 60508 400 1492 IF 0-2 THEN 1500 ELSE 1530 | 2122 CALL HCHAR(12,1,32,1) 
880 IF FEU=0 THEN 990 1500 0-0 2139 1=1-2 

890 IF FEUC=10 THEN 990 1510 6-0 2149 GOSUB 2210 

900 IF FEU€14 THEN 950 1520 GOTO 200 2153 IF N€J68 THEN 2380 

910 CALL HCHAR(12,15,70,1) 1530 IF X(K)=I THEN 1570 216) IF 1-31 THEN 2090 

920 CALL HCHARLI2,165 73,1) 1540 IF X(K)=I-1 THEN 1570 2170 ZALL HCHAP(124 1422, 11 
932 CALL HCHAR(I2:17, 78,1) 1550 D=1 2189 1=1+2 

940 GOTO 960 1560 GOTO 2090 2190 60508 2210 

950 CALL HEHAR( 24,19,32,13) 1570 6-1 2200 GOTO 2380 

960 CALL НСНАЯ(24,19,155,10) 1582 GOTO 2090 2212 CALL HCHAR(12,1,127,1) 
970 CALL HCHAR(24,19,145,(FEU-10 | 1599 IF K=0 THEN 2280 2229 CALL HCHAR(12,(1+1),138,1) 
n Ç 1600 IF L(K)€314 THEN 2280 2239 IF K=0 THEN 2280 

980 GOTO 1010 1612 CALL HCHAR(14,X(K),32,1) 224) IF 6621 THEN 2290 

990 CALL НСНАВ(24,19,32,13) 1629 IF C(KI€D141 THEN 2030 2259 L(K)213 

1009 CALL HCHAR(24v19, 155, FEU) 1630 PTS=PTS+5 2260 X(K)=[ 

1010 PTÁsSTRS(PTS) 1540 X(K)=0 227) GOSUB 2350 

1020 v$s'PTS.s'aPT$ 1552 С(К)=0 2280 RETURN 

1032 JA=24 1660 L(KI=0 2290 IF DEA THEN 2380 

1040 IA=2 1679 K=0 2399 L(K)=13 

1050 GOSUB 400 1680 GOTO 880 2310 XIK)=I+1 

1960 IF K=1 THEN 1200 1592 IF X(K)€8 THEN 1990 2323 GOSUB 2350 

1079 K=1 1700 IF 25€X(K) THEN 1990 2339 RETURN 

1080 X(K)-INT(RND*32) 1710 IF X(K)=11 THEN 1780 2340 GOTO 2380 

1090 IF X(K)€8 THEN 1110 1720 IF Х(К)=16 THEN 1780 2350 ALL HCHAR(I2,01-2),32461 
1192 IF X(K)€26 THEN 1140 1732 IF Х(К)=17 THEN 1780 2362 CALL HCHAR(I3,XIK) S CCKO 41) 
1119 L(K)=3 1740 IF X(K)=22 THEN 1780 2370 RETURN 

1122 C(K)7154 1750 IF X(K)224 THEN 1780 2382 IF N88 THEN 880 

1130 GOTO 1200 1162 IF 174ХІКІ THEN 1800 2392 IF G=1 THEN 2420 

1149 L(K)=5 1770 GOTO 1820 2409 IF D=1 THEN 2420 

1150 XX=RND*1 1782 LI=18 2419 GOTO 880 

1169 IF XX(0.8 THEN 1190 1790 SOTO 1830 242) G=2 

1170 C(K)=141 1800 11=19 2430 0-2 

1180 GOTO 1200 1810 GOTN-1830 2440 GOTO 880 

1192 C(K)=144 1820 LI=20 

1209 IF K=0 THEN 1070 "|, 
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o CAPRICORNE TWO 


Un hélicoptère vous traque 
dans les dédales d'un relief tourmenté avec le seul but 
de vous astreindre à commettre votre dernière erreur. 


sible les missiles de croisière de votre ad- 
versaire. Là-bas, hésiter c'est mourir ! 


BUT DU JEU 


- Déplacement de l'hélicoptère bleu : E 

touches «E», «S», «D», «X». АШОГАЛЕН 1 

- Déplacement de l'hélicoptère vert : Contourner les montagnes, choisir les 

touches «O», «К», «L», «„». angles les plus intéressants, éviter si pos- 

10 CALL CLEAR 400 IF 2415 THEN 420 870 GOSUP 67C 

20 CALL SCREEN(15) 410 IF THEN 449 880 CALL KEY (5, NN, STATUS) 

30 CALL COLORI 420 IF J()ló THEN 450 890 IF STATUS=0 THEN 380 ELSE 10 
40 CALL COLOR (14,14, 1) 430 IF 1()25 THEN 450 PRISE EN COMPTE DU CLAVIERs----- 
50 CALL CCLORLI5, 5,1) 440 GOTC 490 910 CALL KEY(IS,N (STATUS) 

60 CALL COLOP (L6, 125 1) 450 X=INT(RND#50 1 920 IF М(165 THEN 370 

70 CALL CHAR(128,!FFFFFFFFFFFFFF | 460 IF 1(Х THEN 490 930 IF М1()0 THEN 1020 

FF') 470 A(J+1)=2 940 JM=JB 

30 CALL CHAR(129,'0042241FFFA442 | 480 CALL HCHAF(Jy le 13651) 950 IM=18+1 

` 490 NEXT 1 960 MI=3 

90 CALL CHAR(Í130,'004225FFF82442 | 500 NEXT J 970 IF N()59 THEN 1020 

H NOUVEL HELICCPTERE============== | 980 IF MI(10 THEN 1020 

100 CALL СнАя(131,*333343ЕР43*) 5401485 7 ----------- 990 JM=JV 

110 CALL СНАЯ(132»"081С030808081с | 520 13-5 1000 IM=IV+1 

Lc 530 JV=16 1020 MI=7 

120 CALL CHAR(122,'0000C2FFC?!) 540 IV=25 OEPLCT MISSILEs2222222222222224* 
130 CALL СНАР(134,* 338101010103 | 550 A(16,25)=4 1020 IF М1=0 THEN 2260 

3104) 560 MI-0 1030 IF MI=2 THEN 1140 

140 CALL СНАЯ (136, 0242C8E83F010 | 570 CALL ACHAR(5959144911 1040 IF Mi=3 THEN Lied 

010171 580 CALL HCHAR( 269 591649 H8) 1050 IF MI=4 THEN 1220 


150 CALL CHAR(T44,'00642241FFFA44 590 CALL HCHAS(16, 25,15 1060 IF MIs5 THEN 1260 
” 600 CALL HCHAP (24,14,15 1070 IF MI=6 THEN 1200 
160 CALL Снва(:45,"0600606667Е3 | RETOUR =т=т=т======шш=таш=тштшт= | 1080 IF Wis? THEN 1340 


Се) 610 Р85-5ТР5(Р8) 1090 IF МІ=8 THEN 1280 
170 CALL CH/RC152,*004225FFF8244 | 620 У5-СН85(145%4СН85(612Ү4Р85 1000 JOsJM-1 
2t! 630 JA=22 1110 10=1ҹ 
180 CALL СНЕР(153%"0606050666763 | 640 IA=5 1120 С-із2 

Се) 650 60508 670 1130 GOTC 1410 
INITIALISATIDN=======z====z===== | 660 GOTC 770 1140 JO=JM-1 
190 HB=1 ROUTINE AFFICHAGE=============== | 1150 [0=14+1 
200 HV=1 670 AA=LEN(VS) 1160 С=122 

210 PB=0 690 FOR BA=0 TO АА 1170 GOTC 1410 
220 PV=0 690 EA=1+8A 1180 JJ=JM 
230 CPTICN BASE 1 TOO IF AA(EA THEN 760 1190 10=1M+1 
240 DIM A(22,32) 710 US=SEGS(VS,EA, AA) 1200 C=133 

250 RANDOMIZE 120 CA=ASC(US) 1210 GOTC 1410 
CADRE=========================== 730 FA=IA+BA 1220 JO=JM+1 
260 CALL НСНАЯ(1,1,128,32) 740 CALL HCHAR( ЈА, ҒА ,СА,1) 1230 І0-1М%1 
210 CALL VCHAP(2,32,128,21) 150 NEXT 8А 1240 C=134 
280 CALL HCHAR( 22,1, 128,31) 760 RETURN 1250 GOTO 1410 
290 CALL VCHAR(2,14123,20) 770 PVS=STRS(PVI 1260 JO=JM+1 
MATRICE TERRAIN=====. ========= 180 VS=CHRS(153)4CHRS(61)sP VS 1270 10-1М 
300 FOR 2-1 TO 22 790 JA=23 1280 C=124 

310 A(J,1)=1 300 IA=16 1290 GOTC 1410 
320 А(),32151 810 GOSU8 670 1300 JO=JM+1 
330 NEXT J CONDITION DE FIN DE PARTIE====== | 1310 10-14-1 
340 FOR 1-2 ТС 31 820 IF LO(HB THEN 840 1320 С=134 
350 А(1,13=1 830 IF HV(10 THEN 900 1330 GOTO 1410 
360 A(22,2)=1 840 VS='LE BUDJET HELICO EST ECO | 1340 JO=JM ` 
370 NEXT 1 RNEI* 1350 IOsIM-l 
330 FOP J=2 TC 21 850 ЈА=22 1360 С=131 
|390 FOR 1-2 15 31 860 He? 1370 GOTC 1410 
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1380 JO9=JM-1 1920 JV=JP 2410 JP=JVel 


| 1390 IO=IM-1 1930 IV=IP 2480 IP=IV 
1400 C=132 1940 А(1У,1У1-4 2490 60508 2630 
1410 IF А(10,10)(20 THEN 1490 1950 RETURN 2500 IF М()83 THEN 2540 
1420 CALL HCHAR (JM, IM 2291 3 1960 IF A(JP.IP)-3 THEN 1980 2510 JP=J8 
1430 CALL НСНАВ (ЈО, IC, C41) 1970 IF A(JP,IP)()4 THEN 2020 | 2520 IP=18-1 
1440 A( JY, IM)=0 1980 Нв=нВ+1 2500 60508 2550 
1450 Јн=Ј0 1990 HV=HV+I 2540 IF N(D75 THEN 900 12670) 
1460 IM=10 2000 CALL HCHA2(J0, 10, 32,1) 2550 JP-JV 
1470 At June IM) -5 2010 CALL HCHAR(JP,IP,32,1) 2560 IP-IV-L 
1480 GOTC 2260 2020 GOTC 2160 2570 GCSUB 2620 
1490 IF A(JO, IQ) ()1. THEN 1550 2030 FOR Е=1 Tn 20 2580 GOTC 900 (26701 
1500 IF MI-8 THEN 1520 2040 CALL HCHAR(JD,ID,C,1) 2590 J0-J8 
1510 MIsMIet 2050 CALL HCH42 JD, 1052241) 2600 10-18 
1520 GOTC 1030 2060 NEXT E 2610 GOSUB 1820 
1530 MI=2 2070 IF MI=3 THEN 2100 2620 RETURN 
1540 GOTC 1030 2080 CALL НСНАЯ (ЈМ, IM 3251) 2630 JD=JV 
1550 IF A(J0,I0)()2 THEN 1590 2090 A J4, 1Ҹ)=0 2640 10-1У 
1560 RANDOMIZE 2100 IF C()144 THEN 2149 2650 GOSUB 1820 
1570 MI=INTIRND#7I+1 2110 НВ=кВ+1 2660 RETURN 
1580 GOTC 1030 2120 PV=PV+5 DEPLCT 8 DIRECTIONS============= 
1590 IF A(JO, 1C) ()3 THEN 1700 2130 GOTO 2160 2670 IF N( 82 THEN 2710 
1600 CALL HCHAR (JM IM 32,1) 2140 HV=kV+L 2680 JP=JB-1 
1610 FOR E=0 TO 8 2150 РВ=РВ+5 2690 1Р=18+1 
1620 CALL НСНА (JO, 10, 129,11 2160 A(J8 918120 2700 GOSUB 2590 
1630 CALL HCHAR(JOs I0, 22,1) 2170 А(2У41У1-0 2710 IF NCY80 THEN 2750 
1640 NEXT E 2180 IF IM=0 THEN 2200 2120 JPzJV-1 
1650 PV=PV+10 2190 At JM, [M)=0 2730 IP=IV+1 
1560 HB=HB+1 2200 А()С,10)=0 2740 GOSUB 2630 
1670 CALL НСНАК (ЈУ, 1У,32,1) 2210 IF A(JP,IP)(3 THEN 2230 2150 IF МУ 67 THEN 2790 
1680 МІ=0 2220 A(JP,IP)-0 2760 JP=JB+1 
1690 GOTC 2160 2230 CALL НОНАЗ()8,18,32,1) 2110 IP-IBel 
1700 CALL HCHAR (JM, IM, 3251.1 2240 CALL НСНАВ (ЈУ, IV, 32,1) 2780 60508 2590 
1710 FOR Е=0 TO В 2250 GOTC 510 , 2790 IF Mise THEN 2830 
1720 CALL HCHAR (JC, IC, 130,11 2260 IF М6)69 THEN 2300 2800 JP=JV+1 
1730 CALL HCHAR(JC 10, 32,1) 2270 1Р=18-1 2810 IP=IV+1 
1740 NEXT E 2280 1Р=18 2820 GOSUB 2630 
1750 РВ=РВ*10 2290 GOSUB 2590 2830 IF М4)90 THEN 2870 
1760 HV=FV+1 2300 IF N<? 79 THEN 2340 2840 JP=J8+1 
1770 CALL НСНАЯ(28,18,22,1) 2310 JP=JV-1 2850 1Р=18-1 
1780 МІ=0 - 2320 IP=IV 2360 GOSUB 2590 
1790 5070 2160 2340 60508 2630 2870 IF MIT THEN 2910 
ROUTINE CE DEPLCT=============== 2340 IF Һ<)68 THEN 2230 2880 )Р=)у+1 
1800 C=144 2350 JP=J8 2890 ІР=1У-1 
1810 GOTC 1830 2360 1Р=18+1 2900 60508 2630 
1820 C=152 2370 60508 2590 2910 IF NÇ} 87 THEN 2950 
1830 IF &(JP.IP)()O THEN 1960 2380 IF NCY76 THEN 2420 2920 JP-J8-1 
1840 CALL HCHAR(JO« I0 22, ) 2390 JP=JV 2930 1Р=18-1 
1850 CALL HCHBR (JP ІР, Col) 2400 ІР-1У%1 2940 GOSUB 2590 
1860 AJB, 10120 2410 GCSU8 2630 2950 IF N( 73 THEN 900 
1370 IF C( 1144 THEN 1920 2420 IF М()88 THEN 2460 2960 JP=JV-1 
1880 J8-JP 2430 JP=JBH 2970 ІР-ІУ-1 
1890 18=1Р 2440 IP=IB 2980 605/8 2630 
1900 A(J8, 18)23 2450 GOSUB 2590 2990 GOTO 900 
1910 RETURN 2460 IF N()44THEN 2500 š 


БЕТІ MASTER 


Ce jeu de réflexion et de stratégie 
vous oppose à votre micro qui, lui, dispose d'une faculté essentielle : 


la rapidité de réflexion. 
cité. Vos déductions vous permettront, - Rentrez un chiffre. 
peut-être, de vaincre la machine. - Pour vous déplacer, appuyez sur les 
Votre objectif sera de découvrir les flèches. 
énigmes et combinaisons que vous propo- |== AU CLAVIER -_Роиг valider une combinaison, faites 
sera votre TI99. Pour les résoudre il vous - Faites RUN et appuyez sur une touche «ENTER». 
faudra faire preuve d'une grande saga- quand le TI99 vous le demande. - Pour stopper la partie, faites «ЕСТМ9». 


10 "Programme de MIND = TX99/44 
20 'Oürdre des coul d 
30 'l!Jaune pale! 
40 '!Vert clair! D 
50 '! 1 ! z ! 


Vert pale !Transparerit! 
Noir  ! Blane  ! Violet ! 
# ! s H ó ! 
Bleu pale !Vert fonce! Rouge 1 
8 П 9 ! 0 ' 


100 CALL CLEAR 


110 CALI. SCREEN(8) 
120 DIM TCL6) »VCL6) »GC30 r 16) 
PECBOD YF (30) YY C16) 

130 PRINT " JEU DU MASTER 


HE 


GOTO 44 
бї="ЕЕЕЕЕЕЕЕЕЕЕЕЕЕЕЕ" 
баш. CHARCAQ УАФ) 

CALL CHARÇAL» " "> 

CALL. CHAR(BBr A$) 

CALL. снак(89,""2 

CALL. COLORCZ 2275: 
CALL COLOR (8,4,5 

FOR Tei TO 5 

баш. CHAR (Leit > X832 


D 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
› 
240 
H 
250 CALL. COLDRCT+11y (1+3›ж2— 
HARSCH 
260 NEXT Т 
270 FOR Т=0 TO 14 
290 READ YCL) 
290 NEXT Т 
300 DATA 128»41»89»136»40515 


at 


GALL. CHAR (LLO k84+33» "" 


8»145›5129›121›144›137›120›1% 
2»88у96 


T=34 TO 38 
ot 
CHAR СЛ, 68» 


- CHAR (Тә AW) 

CA 

CHAR СВУ» *181818ЕЕЕЕ 
Ë CHAR (96 y "03668301818 
306603") 
410 GOTO 1140 

420 рата 000000000000606»000 
,1818181818181818,000 
8»000000Ғ8Ғ81818 
»191819F8F8 
81818»19 
1F181818»18 


Len de pions 
isons voulezx-votu 


THEN 440 

THEN 440 

470 VENTO.) 

480 INPUT "Combien de coule 
ra per pions voulez-vous 


N 480 


urs in 
co 


aridervb anas chiffres de 


mud tanemarrt sur 
fleches vous 


"ein P 


binaison etFCTN 9 d'arreter 
la partie." tiii 

550 PRINT "Four commencer» a 
ppuyez sur une touche." 

#70 CALL КЕҮ(О,КК,58› 

580 IF 55=0 THEN 570 

590 СА! CLEAR 
600 N$="GAGNANTE 
*$(1)="C'est per 


620 F$(2)="la combinaison " 
630 F$(3)="etait simple 4 " 


640 GOTO 15 
650 RANDOM: 
660 Р%‹4› 
670 K=0 
680 FOR Ізі TO L 

690 TCLI=TNTCCC+H1 2 KEND? 
700 P$C4)=F%$(4)8STRE CT CL) У 
710 NEXT Т 
720 Кекті 
730 FOI 
740 VOL) 
750 МЕХТ 2 
760 Ј=0 
770 CALL. 


HCHAR (23»&»30) 
. HCHARC24y15-INT (L.Z2 


800 CALL HCHAR(024,15-TNT(L.Z2 
dy 62) 
©,КК,66› 


0 810 
к 


INT (L.Z2 


dy 357 


650 J 


660 CALL нснакс24»1% 
+262) 


INT (1..72 


THEN 810 ELSE 780 
9 THEN 900 
890 IF JSL THEN 780 ELSE 810 
900 IF K 1010 
910 YF КК 1790 
(10 THEN 950 
19 
950 ТЕ KK<10 THEN 810 


960 IF KK* 
CALL. носнакс2з»15-ТМТС./2 


14 THEN 810 


Dtr YCKK) ) 
980 VGJ)=KK 
990 GI DEY) 


1000 ТЕ Jel. THEN 760 El 81 
0 

1010 NT CLZ 
2)+J 

1020 

1030 Е! 

1040 IF 9%12>14 THEN 800 
1050 

1060 THEN 1110 

1070 Jl TO L 

1080 CALL HOHARCKES » 15—XENT CL. 


2294D Y Y (VCD) 

1090 NEXT J 

1100 CALL НОНАК(23,8»32,16) 
1110 


30 GOTO 1460 
140 CALL CLE, 


1210 

220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 


DERE 2E 


1310 
1320 
i330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 


1600 
1610 
1620 
1630 
1640 


1650 T 


1660 
1670 
1680 
190) 

1690 
1700 
1710 
92) 

1720 
1730 


CALL. HCHAR(24 2 27) 
CALL HCHAR Zä 333529) 
CALL. HEHAR (24 7 ról) 
CALL. HCHARCZA»Y24» 61.2 
CALL. HCHARC24 » 32» 38) 


PRINT "сотіз% 

%г cou % COMETNAT 
$placee no $ 

emul bi"s 

CALL HOHARC22 » 31 » 1082 


CALL. HCHARCZ3»31 »1155 
CALL. HCHARC2A 731 » 34» 
PRINT 
CALI. 
CAL... 
CALL. 
CALL. 


HCHARCZA r 3 » Size» 
НОНАК(24»7У879 
нснакс24,24»87) 
нснак<24»28» 87) 


FOR Is1 ТО 18) 


NEXT Т 

FRINT 

CALL. VEHAR CZ» Zv36» 22) 
sén 22) 


63) 

Я HCHAR S 32164) 

VCHAR(6 2436» 18) 

LL VEHAR 6» 28 36» 192 

HCHARCZA»2»59) 

„ HCHARC2ZA» 3 35 29» 

HCHARCZA»32» 60) 

HCHARCZA»7 r62) 

HCHAR (2.4 y 24» 62 
%(24»28962) 


TODSTOD +5 
MCODOSVCID t 1 


TJ) THEN 1590 


IF Е(К)>10 THEN 1700 
CALL HCHARCS+K Zóv3ger c 


GOTO 
CALL. 
CALL 


1720 
HCHAR (SAK » 255 49) 
HCHAR (HHK y 26 » 38+F C 


ТВ 
CALL. 


10 THEN 1750 
HEHAR (SAK y Z 0 y EFE 


GOTO 
CALL. 
CALL. 


1770 
НОНА CEK y 29 49) 
НСНАК (54K y 30 » 38: 


ТЕ Eist, THEN 1900 
IF K: 
FOR I=1 TO 3 


1790 
1800 FOR Jesi TO 15 


1810 CALL HCHAR(CHTI»8*J» ASC ¢ 
SE СРС) vd» 120) 

1820 NEXT J 

1830 NEXT X 


qaa 


1840 FOR Т=1 TF L. 
1850 CALL НСНАК(9»15-ІМТСІ./2 


)+IsY(T(I))) 
1860 NEXT I 


1870 CALL НСНАК(9»23,32) 
1880 CALL НСНАК(10,9,22»15) 
1890 GOTO 1930 

1900 FOR I=1 TO 11 


1910 CALL HCHAR (4s 10-I»68C CS 
EG (NS » Ly 13) 

1920 NEXT Т 

1930 CALL КЕҮ(0»КК»55) 

1940 IF SS=0 THEN 1930 ELSE 
1140 3 


Une idée originale qui se situe 
entre les programmes d'assistance graphique et les logiciels de jeu. 
Si vous avez un esprit de dessinateur 
et si vous aimez vous distraire, ce petit programme 
est fait pour vous. 


BUT DU JEU 
A l'aide des divers éléments proposés, 


tentez de réaliser vos cadres de jeux, et 
amusez-vous à simuler le travail d'un gra- 
phiste de renom. 


AU CLAVIER 
- Faites RUN et entrez vos valeurs. 


Z ' Programme de trace dé со 
urbes IIT 

10 CALL. CLEAR 

12 CALL SCREENC2) 

14 ОРТТОМ BASE 1 

16 FOR T=1 TO 16 

17 CALL. COLORE» 16 1) 

18 NEXT Т 

100 CALL HCHÓRCL»2»31»767) 
110 Cs31 

120 DIM T(8»8) 

130 INPUT "Valeur minimale d 
е X ? "SXMIN 

140 INPUT "Valeur maximale d 
e X ? "3XMAX 

190 HXsCOXMAX-XMIN)D/31 

155 HXOSHX/G 

160 INPUT "Valeur minimale d 
е Y ? "3YMIN 

170 INPUT "Valeur maximale d 
е Y ? «{ҮМІМ 

180 HYsCOYMAX-YMIND/23 

181 HYBsHY/8 

182 CALL. CLEAR 

189 CALL. HCHAR C1 » 2» 31767) 
184 TI 0 THEN 194 

186 0 THEN 194 

188 ҮС“ІМТ(1-ҮМІМ/НҮ» 

190 YF TNT(1-(YMIN+(YC-1)x8HY 
)/HY8) 

192 GOTO 198 

194 ҮСеі 
196 ҮР]. 
198 ХЕ ХМЇМ>=0 THEN 208 
200 IF XMAX<=0 THEN 208 


202 XC=INT (2~XMINZHX 
204 XP=TINT(1-(XMIN-+(XC-2)xHX 
) /HX8) 

206 GOTO 212 

208 ХС=2 

210 ХР=1 

212 YFAX=YF 

214 GOSUE 4100 

218 GOSUE 3000 

220 CALL VCHAR(1,XC,C 24) 
222 ХРАХ-ХР 

224 GOSUE 4200 

228 GOSUE 3000 

230 CALL. HCHAR(2S-YC»2»C»31) 
232 GOSUB 4300 

240 GOSUE 3000 

244 CALL HCHARC2S-YC»XCO»C) 
246 X=XMIN 

248 FOR ХС=2 TO 32 

250 XR=X 

260 GOSUB 1000 

270 IF Y>YMAX THEN 550 
280 IF Y«YMIN THEN 550 
290 YR= 

300 YC=INT((YR-YMIN)ZHY+1) 
320 XK=XR 

325 YK=YC 

330 GOSUE 2000 

350 X=XR+HX 

360 GOSUE 1000 

362 IF MAX THEN 560 
363 ТЕ Ү<ҮМІМ THEN 560 
370 YŠ=INT((Y-YMIN)ZHY+1). 
390 IF YS-Y THEN 415 
400 FAS=1 


410 
415 
425 
427 
430 
FAS 
455 
460 
480 
550 
560 
570 
580 
590 
1000 
1010 
2000 
2030 
2040 


сото 425 
PAS=-1 
ТЕ opge 
XK=XR 
FOR IsYCHPAg 


#1 THEN 560 


TO YS STEF 


YK=T 
GOSUE 2000 
NEXT Т 
X=XR+HX 
NEXT XC 
CALL. KEY (0vK»8) 
IF S=0 THEN 570 
END 

Y=X 

RETURN. 

х=хк 

FOR ХР=1 TO 8 

х=х-НхӘ/2. 
2050 1000 
2060 NT CEY CYKL KHY YM 
TN) ZHY8+1) 
2110 XeXeHx&8ü 
2120 GOSUE 1000 
2130 ҮР -“ІМТ(<Ү--СҮК--12жНҮ-ҮМ 
TN) ZHY8+1) 
2140 
2144 
2145 
2150 
2160 
2170 
2180 
2190 
2200 


1 ТНЕМ 220% 
THEN 2250 
THEN 2250 


РАР= 1 
ZF: ҮР 
sisch 
ZE T 
YF1=1 
GOTO 


THEN 2180 


2220 


ss аја 


THEN 


2220 
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2205 YF ҮР1<1 ТНЕМ 2250 2901 ТЕ В%<>"000000000000000 3150 NEXT J 


2206 8 THEN 2250 0" THEN 2208 3190 CALL. CHAR(C E$) 
2210 2903 С-С-1 3200 FOR J=1 TO 8 
2211 THEN 2213 2905 RETURN 3210 FOR T0 8 
Ф217 2908 CALL HCHAR(25-YK+XC C) S220 T(J+K>=0 

2219 1 =8 THEN 2220 2910 RETURN 3230 NEXT K 

2214 3000 E$="" 3240 NEXT J 

2220 "YFA TO ҮР2 ӨТЕР | 3010 C=C+1 3250 

FAF 3020 IF 160 THEN 570 4100 | TO & 
Z230 T(9-YF Y XF)=1 3030 FOR J=1 TO 8 ` 4110 T(9-IAXYYFAX)=1 
2240 ў 3040 Е1=8жТ<.Ј»1)+4жТСЈ,2)+2ж 4120 NEXT ТАХ 

2250 T(J93)+T (Jy 4) 4130 RETURN 

2260 3050 EZ=BXT (J9 5) +4XT (Jr 6) 42x 4200 FOR IAX=1 TO 8 
2830 j-YK»XC»CX) | TJ 20 *TCA»8? 4210 Т(9-ХРАХ»ТАХ) =]. 
2840 2 3060 ТЕ Б1>9 THEN 3090 4220 NEXT Хах 

2850 3070 Б1=Б1+48 4230 URN. 

2652 3080 GOTO 3100 4300 FOR ТАХ=1 TO 8 
2853 3090 Bl=E1+SS 4310 T(9-TLAXYYFAX)=1 
2860 IF CX<33 THEN 2880- 3100 IF Б2>9 THEN 3130 320 T(9-XFAXv» LAX) =1 
2870 GOSUER 4200 3110 B2=E2+48 0 ç 

2975 бОТО 2900 з120 GOTO 3140 4340 

2880 GOSUE 4100 3130 B2=E2+55 

2900 GOSUE 3000 3140 E%$=B$8CHR (E1 )&CHR$ (E2) в 


aan RACING Z 


Si vous aimez la vitesse 


et les circuits automobiles, vous voilà servi. 
Vos adversaires, nombreux, 
2 manquent absolument de «fair-play», vous le 
découvrirez à vos dépens. 


BUT DUJEU autres concurrents et en évitant les SUr- AU CLAVIER 


Parcourir le plus de distance possible, en prises désagréables que vous réserve ce - Faites RUN et pilotez 
surveillant les réactions brutales des circuit diabolique. 


— 


CIRCUIT DE VOITURE"333!"Vous vous deplacerez avec les 2 flech 


“244 
HH 


CHAR L36» "387 
CHAR (1.29 » "38 
CHARK 124» 181 
aur de l'ecran 


CALL. 


voulez-vous ^? 
voulez-vous ? "L. 
E 1 
FOR Т=1 TO L 
ФАСНКФ CLZZ à 


270 CALL CLEAR 

280 M=N/2-N/25 

290 CALL SCREEN(CE) 

300 CALL COLORC12 1 CF) 
310 CALL COLOR C139 CV CE) 
‚820 CALL COLORC14 CU» 12 
330 LeZé-L 

340 = /2 

350 FOR Ti TO 12 

360 PRINT TAEGJ) E$ 


J+ АЖАМ 
THEN 460 


ү 
„ ОСНАК (146 T X) 
THEN 560 


HCHAR ( 13» X0» éA) 
INT TABGDsES 


530 CALL SOUND (500 » 262 » 03305739275) 
540 A=32 


‘550 GOTO 600 


560 CALL HCHARCL3» T+, A) 
570 РКІМТ ТАЕ) ЕФ 
580 CALL HCHARCL3YI> 129) 


590 А=127 

600 0=0 

610 CALL KEY(3r»K»yS) 
THEN 430 
8 THEN 690 


-THEN 660 
3 THEN 720 ELSE 430 


690 


710 GOTO 430 
720 CALL. C 


i "fautes" 


NT 


$ "eum " ê 


C(PZX100/F3 ) â "p 
750 GOTO 200 


.L HCHAR 13у Xs 136) d 


DUEL 


Suivre la guerre des Malouines 
à la télévision c'est bien,mais la vivre c'est pire. 
Mercenaire, vous choisissez votre camp 
et que le meilleur gagne... 


lantes, le relief accidenté... Vous aurez - || descend avec la touche «». 
BURDUMEU bien mérité votre solde. - Il largue ses mines avec la touche «L», 


Éviter tous les dangers propres à un vol - L'appareil Argentin fait de même avec 
ana que tous ceux qui caractérisent un AU CLAVIER les-touches «Z», «S», et «X». 
conflit aérien digne de ce nom, entre - L'appareil Anglais monte à l'aide de la 


autre, les missiles Exocet, les mines vo- touche «P». 


— 
1 CLEAR, ;20:3=0:Y=1Q:N=38 :M=Y 
5 DEFGR$C2)2=#63:1,57,125,255,255,9,63:DEFGR%$( 33=248,0,0,1,227,255,3,129:DEFGR8( A) 
=31, 128., 192, 240, 63,7. 1,7 :DEFGR$¢ 1 )=252, 128,116, 190, 255, 255, 32, 248 
14 CLS :SCREENØ. 4,9: Ғ=6 
28 FOR Ізй TO 18:LOCRTE0,I,1:COLOR6,6:PRIHT" 

d "SNEMTI :СО 0Р4, 4:LOCRTEG., 19, 1: PRINT"RRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRR 
"COLORO, F 
25 ЕПЕНе170130:Т-ЕМб:МЕХТН 
38 Z=10:FØORA=30 TO 280:2-2-1НТСЕНОЖ? )-2:IFZ<ØTHENZ=Ø 
32 LINECA, 151 2= A, 151-2 2: NEXTA 
ЗӢ Н1=й:Н2=й: AS=INKEYS: IFAS="P"ANDY>1 THENHZ=-1 
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52 IFH$z","THENH2z1 
53 IFAR="Z"AND M>1THEHH1=-1 
54 IFA$="X"THENH1=1 
56 1FAS="S"THENLOCATEX , Ÿ+1, 1: COLORS,F:PRINT"#" 
58 IFRS-"L"THENLOCRTEH. M+1 , 1: COLORS, F : PRINT "#" 
ЄЙ LOÜCRTEN,M,1:PRINT"  ":LOCHTEX;Y, 1:PRINT" ":Y=Y+H1:M=M+H2:X=X+1:IFX238THEHNX=2 
62 МаМ-1:ІЕМ<1ТНЕМ H=38 
65 ТізӘСВЕЕНСХ%1,Ү2:Т2<8СКЕЕМСМ,М2:1Е Y=M AND ABSCX-N3<Z THEN 200 
66 IFT1<>32THEN2ABELSE ІЕТ2< >32ТНЕМ210 
74 LOCATEX: Y. 1:COLOR1,F : PRINTGRSC Ø); GREC 1 5: LOCATEN, M, 1: COLORA: F : PRINTGRSC2 2; GRAC 


93 GOTOSA 

200 LOCATEX-1,#,1:GOT0229 

210 LOCRTEM-1.M,1 

224 COLOR 2: PRINT"BQUM" :LOCATES, 11,1:INPUT"UNE AUTRE PARTIE  ";RS:IFRSS"D" THEN 
1ELSEEND D 


st TOURS INFERNALES 


Appel à pilote de A423. 
Rendez-vous d'urgence dans la cité nucléaire Altacit. 
aux mains de l'ennemi. 


BUT DU JEU Privilégiez donc les petits blocs sur les- - Aller à gauche à l'aide de «J». 
n quels vous pourrez vous approvisionner. ~ Aller à droite à l'aide de «L». 
viter les grands réfrigérants atmosphé- 
riques sur lesquels vos ennemis ont ins- - AUIGDAVIEB 
tallé leur système de défense anti-aérien. - Changer d'altitude avec «О» et «W». 


1 SCREEN2.2.2:CLERR. , 18:CLS 
18 Е=209: #=2Q : N=A :Не= "НАЦТЕ" : K=b 
35 DEFGREC )=28,8,8,127,62,28,8,8:рЕЕСЕЖ 1 27255, 255, 255, 255, 255, 255, 255, 255 DEFG 
RE 2 )2224, 224, 224, 224, 224, 224, 224, 224 
48 DEFGR'& 32-224, 224,224, 224,224, 224, 224, 224: DEFGRS 4 25224, 224, 224, 224, 224, 224,2 
24.224: GOTO 
SA N=Q:A$=INKEV%: IFAR="J"ANDX>1THENN=-2 
55 LOCATEZ, 4, 1:COLORS,2:PRINT'ALTITUDE : ";H%;" ENERGIE : ";E;" ":COLORZ,2 
64 IFRS-"L'RNDX438THENN-z 
7a THEHH#="HRLITE : E=E—20 
20 ТЕН®%="Х"ТНЕНН®="ВН55Е":Е=Е-2Й 
98 LOCRTEX.9,1:PRINT" ":K=K+1 :X=X+N: IFHS="BASSE"THENGOTOZSA 
95 LOCATEX. 18. OLORI. 2:PRINTGRSCH?: COLORZ; 2 
100 GOSUBSAG :E=E-1 : ІҒЕ<9ТНЕМЗӢЙ 
199 GOTOSA 
299 T-INTCRHDX& 1+1 + IFT>3THENLOCRTE1 ,24, 1: COLORZ, 2: PRINT : RETURN 
210 PsIMTCRNDX3B 45: IFT=1THENLOCATEP , 23, 1 : COLOR? 7 : PRINT"RR" j : COLOR? , B: PRIMTGREC 
23: COLOR2, 2:PRINT : RETURN 
220 LOCATEP: 23.1: COLOR; A: PRINTCHRSC 127 >: CHRE 127 2; GREC 3); : COLOR, 2: PRINTGRICA 2 
COLORZ ; 2: PRINT : RETURN 
258 T=SCREEN(#, 10>): 1FT=320RTSATHENGOTOSS 
264 IFT=127THENGOTOZA4 
270 ВЕЕР :Е=Е+29:50Т7095 
399 FORA=ATO? : LOCATEX*, 19, 1 : COLORA: 2: РЕІНТСЕФС A 2: FORI=1 TOA : NEXT 1 :MEXTA 
318 FORR-1TO4GB:NEXTR 

220 CLS:SCREEMG.B:LOCRTES. 18:PRINT"VOLS AYEZ PARCOURUT ";K;" KM" 

330 PRINT :PRINT :PRINT :PRINT : INPUT" UNE AUTRE PARTIE  ":R$:IFR&-"O"THENi в 
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BOUPY 


Il s'appelle Boupy et son seul plaisir 
consiste à parcourir les écrans de télévision 
à la recherche de pastilles nutritives. 
Aidez-le à échapper aux monstres 
qui le poursuivent. 


а 


ВОТ DU JEU AU CLAVIER ima aller еп haut appuyer surlatouche: 


Attrapez les éléments de couleur dessimi- - Pour al p ` 
Anr ppo: EE Ee SS aler à gauche appuyer sur la ош; aller еп Баз арриуег sur la touche : 
monstres qui vous harcëlent. - Pour aller à droiteappuyersurlatouche: - En cas de force majeure appuyer sur la 
—  —— IrSÑT o touche : «К». 
— 

1 CLS:SCREEN1, 9,9: CLEAR, , 20: S20: X220: Ye] 1: N=Q : MEN ï XM=5 : YM=2 

5 DEFGRÉK 1 2269, 126,219, 152,255, 189,195, 126 : DEFGRSC 22260, 126, 219, 189, 225, 195, 189, 


2538!DEFGRSC3 5268, 24, 68. 126, 126, 126, 68, 24 
28 COLORI. 1:FORASATO4A:LOCATEA; 9: 1: PRINTCHRSC 127 2: LOCATER, 22 : PRINTCHRSC 127 >: NEXT 


38 FORR&1TO21:LUOCRTEG, A; 1 : PRINTCHRSC 127 >: LOCATE49, R, 1 : PRINTCHRSC 1272: NEXTR 

49 COLOR4, 9: FORFIS1TDI25 INTC RNDX20 > : LOCATE INTCRND#39 341  CRNDX2 1241. 1 : PRINT" 3 МЕХ 
TR:COLORZ, à 

SA REAINKEYS:IFRSZ"J"THEN N=-1:M=Q 

53 1FA8="K"THENLOCATEX; Y, 1:PRINT" ":XsINTCRNDK39 2+1 : Ys INTCRNDK19 +1 

55 IFR&-"L"THEN М=1:М=й 

56 ТЕН®="2"ТНЕНМ=-1‹М=й' - 
58 ІЕНФ-"Х"ТНЕН H=1:N=@ 

68 LOCRTEM, Y,1:PRINT" ":LOCATEXM; YM, 1:PRINT" "X=M+N:Y=Y+M:C=SCREENCX,Y): IF С=12 
7 OR Се42 THEN 20A ELSE S=S+1:LOCRTE14,22,I:COLOR6,1:PRINT"SCORE:";S 

65 ІЕС-ЙТНЕН S=S+100:PLRY"DO" 

66 IF RND>.95 THEN LOCATE CRNDK38 2+1 , CRND#19 +1 , 1 : COLORS, Q: PRINTGR#C 3) 

78 LOCATEX: Ÿ 1 :COLORS, Я: PRINTGRSC 1 2: GOSUB198 : LOCATEXM, YM, 1 : COLOR, A: PRINTGRÉC2 2: 
IF Neicht AND Y=YM ТНЕН200 ELSE 50 

100-1Е RND>. 7 THENRETURN 

105 IF ХОХМ THEN XM=XM+1:GOTO 120 

118 IF X«MM THEN XM=XM-1:RETURN 

120 IF Y4YM THEM ҮМзҮМ-1: RETURN 

138 IF YMY THEN YM=YM+1:RETUFN 


149 RETURN 
299 PLRY"DOREMIFRSOLRSIDO": LOCRTEIB.23:INPUT"LIHE AUTRE PARTIE ";R&:IF R#="0" TH 
EN1 ELSE END = 
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Si PARCOURS 


Votre chenille ne demande 
qu'à grandir. Malheureusement pour elle 
et pour vous, le programmeur a tout fait 
pour l'en empëcher. 


BUT DU JEU fois que yous aurez atteint 100 points. - Descendez а l'aide de «Х». 
- Allez à gauche avec «J». 
Survivre en évitant les obstacles et l'en- AU CLAVIER - Allez à droite avec «L». 


ceinte du décor qui changera à chaque - Montez à l'aide de «Z». 


1 CLS:SCREEN1 ; 9,0: CLEAR: , 29: S20: sz: Y211: N21: Rep: XM=5: YM=2 : D=1 : B= 
5 DEFGRSC 1224,60. 126, 285,295, 126, 60,24 

10 5051820 :50т045 

28 COLORI. 1: РОКА=ЯТОФИ : LOCATER; 8. 1 : PRINTCHRSC 127 >: ОСЯТЕЯ, 22 : PRINTCHR# 127 3: NEXT 
A 


З@ FORA=1T021 :LOCATEG. À; 1 :PRINTCHREC 127 2: LOCATE4A, Я, 1 : PRINTCHRS 127 2: NEXTA 
49 COLOR4,B:FDÜRR-1TOSO-INTCRNDX22 >: LOCRTEINTCRNDX38 3+1, CRNDX20 3+1; 1 : PRINT"E" : HER 
TR: COLOR2 , A: RETURN 

45 LOCATEX, Y, 1:COLORS, B: PRINT" ":BEEP:LOCATEX: Y 1: PRINTGR#C 1 2 

46 AR=INKEYS:IF A$="" THEH45 ELSE 51 

59 RUSIMKEYS 

51 1ЕН%=".)"ТНЕН Hz-1:HM-8 

53 IFA$="L" 
56 IFA$="Z"THENM= 
58 IFA$="X"THEN M-1:N-8 

6@ X=K+N: Y=Y+M:C=SCREENCX.4Y 2: IF C=127 OR C=35 OR Cp ORC=79 THEN 280 ELSE S=S+1: 
LOCATE 14,22, 1:COLORE, 1: PRINT"SCORE : "i; S 

65 IF (S/188»-INTCS/188) THEM PLAY"FASOLASIFASO" : CLS : SCREEN! , 9, A: GOSUBZA 

ee IF RHD>.95 THEN LOCATE (RNDX382*1.(CRNDX19»*1, 1: COLOR: 9: PRINT "A" 

78 LOCATEX, Y , 1 COLORS, 0: PRINTGRSC 1 >: GOTOSD 

288 PLRY"DOREMIFRSOLRSIDO": LOCRTEIG,23:IMPLIT"UNE AUTRE PARTIE ";RS:IF R$="Q" TH 
ЕМІ ELSE END 5 


п 
qm 
51 NUCLEAR 

Lorsque le temps devient un ennemi 
et que les évènements jouent contre vous, vous restez seul 
contre tous avec, comme seuls alliés, votre ruse 
et votre rapidité d'action. 
vous ne tarderez pas à découvrir. Vous 
БИДЕН pourrez aussi vous procurer de l'énergie [ AU CLAVIER 

Empëcher par teus les moyens l'explosion (а vous de savoir comment.) - Pointez à l'aide du crayon optique les élé- 


de la centrale atomique en éliminant les 
dangers qui apparaîtront à l'écran et que 
1 CLEAR, 24 
5 CLS:SCREENG,6.0:F=6 
18 DEFGRS( 9 =0, 126, 255,255,255, 255, 126, 60: DEFGRSC 122189, 153, 126, 24, 24, 36, 36, 102 
: DEFGRSC327126, 24, 126, 24, 126, 24, 126, 0: DEFGRSC2 2760, 60, 24, 255, 199, 182, 24, 126 
24 DEFGRÉC42-8,42,28,127, 28, 42, 8, B: DEFGRSCS es, 126, 219, 255, 255, 219, 126, 60: DEFGR 
$C6228, 16,64, 24,153, 0, 68, 16: DEFGRSC? 271,14, 56, 24, 14, 24, 112, 128 
39 Т=1:В=0 :1 22000 INTC ЕМОЖ2ЙЙЙ 2: ESINTCL/Z185 
35 LOCRHTE1,2:CULOR3,1:RTTRB1,1:PRINT"CENTRRLE NUCLEAIRE" :COLORG, F :ATTRBA, A 
48 FORI*1TUZOB:LOCRTE4.11:PRINT"CH COMMENCE DANS ";200-1;" SECONDES" :HEXTI:CLS 
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ments favorables et défavorables. 


Е:РЕ1НТСЕ& СС) 

55 R=R+T:LOCATEA: 9. 1:COLOR1;F:PRINT"MASSE CRITIQUE : ";R;" SEUIL : 

56 E=E-8: LOCATEZ,23, 1:COLORS,F:PRINT" ENERGIE + ";E;" SCORE : 

27 IFR?SL ПРЕ<й THEN20Q 

Ed e Toz’ 1НРЕМХ,Ү+Х=1НТСХ/В 0: Ү=1НТОҮ/В):1ЕХ=М AND Y=M THEN LOCRTEX, Y, 1 ‘PRIN 
жй TO 

65 HEXTR: IFC?3THENTET«C:GOTOSO 

7@ IFRND?, 4THENLOCATEN; М, 1:PRINT" " 

84 GOTOSQ 

100 БЕЕР!ІЕС<ЗТНЕМТ-Т%10:507050 

195 IFC=3THENESE +30 : 507050 

118 SsS4CX18B: T=T-INTCC/23: IFT<ATHENT=Q: GOTOSA 

120 GOTOSA 

Ей FORIS TOTON: NEXTI 'LOCATE7 11.1: INPUT"UNE AUTRE PARTIE  ";R&:IFRS-"Ü"THEHIELS 


Э0 Ve TH 4Ø¥RND 2: M=INTCRND#22 2+1 : C= INTC RNDEZ 5: CO=INTC 6¥RND 3: LOCATEN M. 1: COLORED, | 


RAID SUR NEW-YORK 


Rejoignez au plus vite la base d'envol Titl. 
Vous êtes le dernier des kamikazes, 
sur lequel repose l'espoir du Japon. 


constamment de l'altitude. Vous devez ra- 
EUUDUNEU. ser tous les grattes-ciel pour atterrir, ré- ЕЕ AUIGLANIER 
Votre première et dernière mission parer et repartir à l'assaut de nouveaux - Pour larguer une bombe, il suffit de pres- 
consiste à raser New York. Cependant, vo- „quartiers. Et ainsi mourir en héros pourla ser la barre «espace». 
tre avion, un «zero», a été touché lors de gloire de votre pays. - Ce logiciel nécessite l'utilisation d'une 
l'attaque de Pearl-Harbour. Et vous perdez extension 8 ou 16 Ko de mémoire vive. 


[ 18 РОКЕ44, 28: POKE46, 28: POKE48, 28: POKES9, 28 : POKE43, 10: POKE45, 12 :POKE47 , 12: POKE49, 
12 

24 РОКЕР1??.8:РОКЕ?178,й:РОКЕ?179.й:РОКЕ198,4:РОКЕ6З1,76:Р0КЕ622,2087:РОКЕ6ЗЗ,13: 

МЕМ 


READY. 

19й REM COPYRIGHT 
120 RH=36264 "EN 
128 
148 à š 
158 505 

| > 
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288 L=L+1:;K=-K 


218 IFE S M EC+19+2 Zl : AF=G# : GOTO228 


248 PRINTLEFTSCUES. ORIG TECHOS CHAF 
ü ©: IFPÉEKCE3-22THEN3HB 


ы EPL THENEDE 
+ INTLEFTECYEE. LSLEFTE¢HOF , C-KO OF : GOTOZ266 
ОКЕЕ-К+С0,@ 


o ES 


IFSESHITHEHH 
PRINT" MINE AUTRE PRRTIECD/ZND?" 
IFI$s"Ü"THEM 


IFI$z"H'"THEHPÜOK, 
а Eine 


#87: PRINT"; : END 


Je THENS16 
2?STEP-.5:PDKEZ 
t,LOLEFT£CHO$, C)OFSF4 POFESZ, 
` GOTOSAS 

E =PL-STOPL-9STEP-1 : GOSUB796 : NEXT 

5 PRIHT "IMME RAYO 1. PASSONS" : PRINT" ИАЦ QUARTIER SUIVANT" 
FORI=PL-2TOPL. 3 : 50808700: NEXT 

610 POKES2.122:FORI=LTO4STEP-1 

620 PRINTLEFTFCYES, 1+19LEFT#CHO#: CO" > 
638, PRINTLEFTSCVEST, I-12LEFT$CHOS COR 

£48 FORTT-1TO28B:MHERT:MERT:GUTOIS8 

700 POKEI.148:POÜKECO*I,7:POKEI-1,32:POKEI*1 
718 РОКЕІ. 149: FORM=256T01 ПЕРЕ PDKES2: M 
1000 GETIS:IFFSGTHEHIFI$-" "THEHM=2S2:FDKES3; 
10109 IFFTHEH1 18 

1824 FORTT-s1TU35:HEHT:RETUREH 


M: NEXT : RETURH 
M: M=M-5 


: FORM=128T0256 : POKESZ ; M: NEXT 
T : RETURH 
OT01959 


1050 : PsE-2%K : 

1148 ~1 : POKES2, M: POKEB. 32: B=B+22 : EP=REEK{ Bi 

1185 2ТНЕНРОКЕВ, EO: POKECO+E : 4: -1:POKES3; M: RETURN 
1110 ÜKES3. 0: RETURH 


1115 $s9*41: Set): РОКЕВ, ВО: POKECO+B ; ZS, 

1129 IFS=DITHEHPOKEB; 146: FOKECO+E. 2 :F=9:POKE198, 6: POKESS 
1138 RETURN 

5ййй PRINT OH#RAID SUR HEU-YORE##" 

SA2A PRIHT"NRN VEUILLEZ PATIENTER" 

5936 FORI=GTONA-1 : POKE I , PEEK ¢(G4-G+1 2 HEN 

"S46 READA : 1FAESYTHENRETURN 

5954 KET: 

Goen 
sara 
Don 
5990 
166 


S110 DATA ; 2,254,255, 
S120 “8,2562 97,127 1,8; 
5130 247.155. 1,0, 252, 254. 126: 190.2 
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й:КЕТПЕН 


28,224.132,131.12,2522,255 
:184 

251.247.239. 

282,144,56,56.56,16.0 


217,128.@ 


й2,-1 
30144: PRINT TI 


ЧИЕТ ЕПР":НІ 


PRIHT"NNRISPRESGER UNE TOUCHER" ; :РОКЕ 198. й: HRITISO. 1: RETURN 


READ. aj 


ef LASER OMEGA 


Des vagues d'envahisseurs 
tentent de détruire la base Oméga. 

115 deviennent de plus en plus menacants. 
Heureusement, vous disposez du laser Oméga, 
une arme révolutionnaire 
et terriblement destructive. 


BUT DU JEU trace de tir. || est donc assez difficile dele les tirs sont commandés à partir du cla- 
- - maitriser, et de situer sa portée.Uneseule vier. 
Aux commandes d'un vaisseau spatial indication peut vous aider, les vaisseaux * Curseur de droite — droite 
équipé du nouveau canon à laser Oméga, ennemis détruits disparaissentdel'écran. * Curseur de gauche — gauche 
vous partez combattre les escadrilles LA R *.Вагге espace = tir au laser Oméga 
d'envahisseurs ennemis. Le laser Oméga AU CLAVIE 


est assez particulier, car il ne laisse aucune - Les déplacements de votre vaisseau et — 
[а DIMAC22) “50508308: REM COPYRIGHT TILT MICRO 

1 FORA=327É687022229 : POKEA-25600, PEEK CR? : NEXTA : POKES6, 38: POKESZ, 38 

2 RESTORE :FORA=7384707415 : READE : POKEA. B:HEXTA 

з ІНІН8,8,8,28,85,93,107,65,42,42,20,28,8,28,28,8,62,127,28,8,28,8.8,255,.,..,.24 


‚62,255 

8 8: GOTO2G8G 

PRINT"Z" : FORA=8164T081 74 : POKER. 38: НЕХТА 
18 PüKE36879,8:FORRz1TO11:RCR)sL4R:POKERCR 
11 PRIMTTRECII»;"SHI:";HI:PRINTTREC112:; "TA 
100 S5-55-.03:FOüRZ-1T011: IFRNDC 12€. SSTHENNEXTZ: 
193 POKER(Z),32:R(Z)=R(Z)+22: IFRCZ2 £B164THEH 128 


HEXTR: 428124: C578 
A 


GOTO125 


196 Н(22-.%2:МЕЯТ2:0070125 
128 РОКЕН(22,28 
121 NEXTZ 
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125 РОКЕЯ,З2 


138 р=РЕЕКС1972:Ий=й+(0=3125-СП=2З25:Х=и+(Х=81315-СХ=8119› 
150 B=XK-2119:1FDC>32ANDACB)<>XTHEH166 

151 В=й-8119:РОКЕНСВ›,42:РОКЕВСВ›,32:Н6В›=1 +Е:5 
B<11>;"SCORE: "; SC" 

164 POKEX, 27: IFCS2218THEHPRIHT" MBIA" ; TABC112; "GAME OVEPF":FORR=1T0408B88:HE%T : G 
0508300 : 60T08 

180 IFSSCOTHENSC=SC+50:C5S=6:TA=TA+1:L=L+22:GO0TO9 

198 GüTOlsd 

288 IFSC2HITHEHHI*SC 

295 РЕІНТ"МИМИИИӨЯРМЕН РІ) TO BEGIN" 

218 ІҒРЕЕКС 1972 <>З9ТНЕМ219 
220 РОКЕЗв869,255:00Т09 

200 РОКЕЗ6879,25:РОКЕЗ686Э,240 
310 PRINT" TWI LASER OMEGA 
320 PRINTTRB(SO; NENEUSE":PRINT"NER KEYBOARD ONLY" 
339 PRINT gibt CURSOR DOHN":PRINT"IM CURSOR RIGHT 
344 РЕ1НТТВВС8›;"ЖБРНСЕ" 

354 RETURN 

5@й POKES6RTT,195:FORVO-1TO15:POUKE36878. VO: HEXTVO: FORTP=1T 046 : NEXTTP 
501 POKE26978,0:F0KE26877 , 9: RETURN 


+1 : POKEACE) , 28 : PRINT " ADA" ; ТА 


| READY. š 


« SCHUSS 


Vous décidez de prendre quelques jours de vacances. 
Pourquoi ne pas aller faire du ski ? 
Une aventure bien terrestre qui vous changera 
des combats intergalactiques. 


et 99. 
BULDU JEU АШОТАМЕН - Les déplacements du skieur peuvent être 
Premier jour de ski, vous vous élancez - Durant toute votre descente vous verrez réalisés à partir d'un joystick ou des cur- 
sans plus attendre sur une piste noire. défiler le temps, généré par une horloge seurs de droite et de gauche au clavier. 
Chaque bosse peut cacher un sapin. en temps réel. - Ce logiciel nécessite l'utilisation d'une 


- Choisissez la vitesse de descenteentreO extension 3 Ko RAM — super expender. 


READY. : 
Ø REM COPYRIGHT TILT MICRO 


1 POKE36879,8 

2 IMPUT"TMOTRE VITESSE";E:PRIHT"RTTENTION RU DEPART!" 
3 FORA=1TO01699 : НЕЯТН 

4 PRINT" ТЩ ТИ ДЕТ DATA TA TE EEE TT 

D Нч?910 

8 TI$=" 000000" 

19 РОКЕЗ6879,190 

11 FORD=1T0506 

12 PRINTTRBARNDECS2X20) ; "lie" : FORC=1TOE : NEXT 
13 Z=PEEK( 197) : IFZ=64THEN21 

14 Bez 

15 1Е2=З1ТНЕНВ=1 

16 IFZ=23THEHB=3 


17 GOTO22 


178 


TOP (8-2 :B=B/2: IFBC>1ANDB<>3THENE=2 

+В-2: IFFEEK(R>=32THEN25 

23 P=P+1: POKEA: 171: POKER+38728. 2: FORC=1T01908 : NEXT : IFPZ18THEH2S 

24 IFP=1MTHENFRINT "а S^RCHEVE VOTRE PARCOURS YITAL)" :POKER+307 28. 9: CLR :G0TO4G 
25 POKER, FOKER+39729, e HEXTD 

2 РПКЕЗ68Р9,8:РМІМТ:РБІНТ:РБІНТ:РБІНТ:РБІНТ 

A: A= (199# A-INT CA? 53/1899: PRINT'YOTRE TEMPS EST:":PRIHTTIS;R 

31 РЕІМТ"ЕЕНУО!":ІЕРТНЕНРЕІНТ"МН18 VOUS AVEZ EMBRASSE";P; "ARERES" 

35 PRIMT"LIME AUTRE DESCENTE?" 

36 БЕТН%:ІРНФ-""ТНЕНЗ6 

37 IFH$z"D"THEHRUN 

38 ТЕНФ<>"Н"ТНЕНЗЄ 

33 END 

48 RESTÜRE:PÜKE36878, 18:FORA=1T011 :READE. C'POKE36879.0 п 


P LABYRINTHE 


Partant à la recherche d'un fabuleux trésor, 
vous vous trouvez enfermé dans un immense labyrinthe. 
Heureusement, les couloirs sont déserts et rien ni personne ne viendra 
troubler votre tranquillité. 


ER 
‘* F3 = vue d'avion du labyrinthe avec vo- 
BUT DU JEU AU CLAVIER tre position 


Vous devez sortir aussi vite que possible - Pressez une touche pour commencer * F5 — vue d'avion du labyrinthe avec le 

du labyrinthe. Par chance, vous avez dé- - Les touches permettant les déplace- trajet déjà effectué 

couvert un coffre contenant une boussole ments sont les suivantes : * F7 — apparition de la boussole 

et une carte des lieux. * L — avance d'un pas * Z — dernier recours 
E чаг! de tour à gauche - Се logiciel nécessite l'utilisation d'une 
d uart de tour à droite extension de 8 ou 16 Ko de mémoire vive. 
* FI = vue d'avion du labyrinthe — 


1 FEM COPYRIGHT TILT MICRO 
PRINT ГИ НЕТРІНТНЕЖЖЖ":РВІМТ 
FEINT VOUS CHOISISSEZ (ІН ALABYRINTHE DE TAILLE X VPRIREBLE(DE4X4 R20x20)" 
PRINT"XNMVOLIS DEVEZ ЕМ SORTIR MAUSSI YITEQUE POSSIBLE " 

PRIMT"NMBIHFRESSER UNE TOUCHE" 

GETI$:IFI$=" EHS 

PRIMT"ZMTOUCHES DE MANOEUYRE#": PRINT" д 

PRINT"BML-AYANCE D'UN PAS" 

PRINT"SK-GUART DE TOUR GAUCHE" 

PRINT" >-QUART DE TOUR DROITE" 

PRIHT"FI-YUE D'AYION" 

12 РЕІНТ"ЖЕЗ-ІШЕМ AVEC VOUS" :PRINT'AFS-IDEM AVEC TRAJET":PRINT"AF7-BROUSSOLE" 

13 PRINT"AR-LE DERNIER RECOURS" 


SE 


AD Gn 
= 


14 PRINT"NMSEWBISPRESSER UNE TOUCHE" 
'"ТНЕН15 
RIHT Da 
TEFFNRCK)=INTCK#RNDC139+1 : PRINT TI" :E=256#PEEK (6489 


В0%(й0,12,В0%(2,1),В0%<1,й 
Г", "SE ИР" " 


3 ML: 
69 GOTO 
76 PRIHT'ARMMA/OULEZ-VOUS LE MEME COZND": INPUT" ="; I$: 1FI$<>"N"ANDI#<> "0" GOTO 


MB" 


75 ІБІФС>"0"ТНЕНӘЙ 
76 Т1%="@ййййй":Т 


2THEMNHMEAS I. J) 


' FORI=1TOM-1 : FORJ=1TOM-1 : IFMZCI J) 
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77 HEMTI, I: G0SUB1666:GOT01186 
Әй PRINT'UH NOUVEAU LABYRINTHE COZHI": INPUT" ="; I$: IFISCH"H"ANDISCS"O"GOTOSA 
85 IFI$z"N'"THEHEND 

99 РВІНТ"ТИМММ ENTREZ LA TAILLE": PRINT" XABBDU LREVRIHTHE:":PRIHT"MMNKEHTRE 4 ET 


I" j ME : M=AL < ME) 


Sg IFMZ40PM220GDTOSQ 
55 M-INTCM/2)K2:PRINT"NNMBBIIE LE COHSTRUIS.  MVEUILLEZ PATIENTER. a." 
25 PRINT"XHBMIDURRNT" ; INT CM#M/25) j "SEC" 


108 GOSUR1320:T1+="6@9690" >Т-й:/30701100 

128 ЕОРІ=Е+45Т0Е+4415ТЕР22:РОКЕІ, 260: МЕХТ:1Е721007014ӣ 

138 РОКЕЕ+462, 78: РОКЕЕ+424, 78:РОКЕЕ +23, 77 : POKEE 77 : RETURN 

144 PDKEE+440, 166: POKEE+44, 154 : RETURN 

164 FORI=E+6STQE+461STEP22:POKEI,160:HEXT:IFJ>160T0190 

170 POKEE+493, 77: POKEE+43, 78: RETURN 

188 RETURN 

220 FORI=E+114T0E+372STEP22 : POKEI , 225: NEXT : IFJ>160T0240 

220 ЕОЕ1=Е+4@@ТПЕ+4425ТЕР21:РОКЕ1,?8:НЕХТ 

232 FÜRISE*S92TOE*46STEP-23:POKEI. 77 : NEXT : RETURN 

244 ЕОЕІзЕзЗ??ТОЕЗЗ?65ТЕР-1:РОКЕІ,98:РОКЕ1-264,226:МЕХТ 

241 POKEE+378, 254 :FOKEE+1 14,251 : RETURN 

268 FORI=E+128T0E+3925TEP22 : POKE ; 97 : NEXT : IFJ>160T0280 

270 FORI=E+414T0E+4695TEP23 : PFOKEI ; 77 : NEX 

272 FORISE+1GET0E+64STEP-21 : FOKEI , 72: NEXT : RETURN 

280 FORI=E+292T0E+294 : POKEI 96: POKE1~264 , 226 : NEXT 

281 POKEE+392, 252 : POKEE+128 , 236 : RETURN 

328 FORI=E+16@TOE+326STEP22:FOKEI,118:HEXT:IFJ2>1G0T0240 

220 POKEE+128, 77 :POKEE+115, 77: POKEE+258. 78: POKEE*379, 78 : RETURH 
240 POKEE+1606, 128: POKEE+159. 120: POKEE*236; 121 : POKEE+225. 121: RETURN 
260 FORI<E+17ATOE+2468TEP22: POKEI, 117 :HEXT : IFJ21G60TO328 

270 POKEE#148; 76: POKEE+127, 78: POKEE+369, 77 : POKEE+391 , 77 : RETURN 
388 POKEE+170, 120: РОКЕЕ+171, 128: POKEE *246; 121: POKEE+347, 121 : RETURN 
428 ЕОРІ=Е+206Т0Е+2945ТЕР22:РОКЕІ. 196: HEXT : IFJ21GO0TO446 

438 POKEE+184,77:POKEE+161,77:POKEE+316, 78: POKEE+227 ; 78: RETURN 
440 POKEE*206.119:POKEE*205. 119: POKEE*294, 111 :РОКЕЕ+293, 111: RETURH 
468 FOüRISE*212TOE43BGSTEP22:PÜKEI.116:MERT: IFJ21G0TO420 

470 POKEE+198,75:POKEC+169, 78: РОКЕЕ+222, 77 : POKEE +345, 77 : RETURN 
498 POKEE*ZIZ,119:PDKEE*213.119:PDKEE* 308, 111: POKEE* 301, 111: RETURN 
528 FüRI-E*229TOE-2?38TEP22 :PDKEI,103:MEXT:IFJ21G60TOS4G 

520 POKEE+207 77 : POKEE+295  ?2 : RETURN 

540 POKEE+207, 10й:РОКЕЕ+295, 93: RETURN 

Sep FORI<E+222T0E+277STEP22 : POKEI , 191 :HEXT : IFJ21GüTOS98 

578 PUKEE*211,78:POKEE*2922, 77 : RETURN 

529 PÜKEE*211.188:PÜKEE*299,99:RETURH 

620 POKEE+252, 102: IFIJ2160TO0648 

E20 РОКЕЕ+230, 77 :РОКЕЕ+274, 78 : RETURN 

640 FOKEE+239. 199 : POKEE+274 , 93: RETURN 

EEG POKEE+254, 181: IF I»160TO0688 

674 POKEE+222,78:POKEE+276; 77 :RETURH 

epp POKEE+232,100:POKEE+276,39:RETURH 

718 FORI=E+442T0E +468 : POKE . 166: РОКЕІ-396, 162: NEXT : RETURN 

730 FORI=E+279T0E+391 :РОКЕТ, 98 : POKEI-26 4.226 : NEXT : RETURN 

754 FORI=E+387T0E+345 : POKEI , 121 : POKEI-176, 129: NEXT: RETC.— 

770 FORI=E+295T0E+299:POKET; 111 :POKEI-88, 119: NEXT : RETURN 

790 FORI=E+296T0E+298 : POKEI , 99 : POKEI-88, 100 : NEXT : RETURN 

810 РОКЕЕ+231, 198: РОКЕЕ+275, 99: RETURH 

230 РОКЕЕж253, 86 : RETURN 

278 POKEE*253.19:RETURN 

995 CT=6. 

918 J=MZ(RI+DI*CT-DJ,RJ+DJ%CT+DI)> 

915 ONCT*1GOSUP12B, 220., 328,428. 528,628 

324 J=MZ(RI+DI#CT+DJ,RJ+DJ%CT-DI) 

925 QHCT+1G0SUB160, 260, 360. 46B , Dep, 660 

938 CT=CT+1:J=MZCñRI+DI*CT,RJ+DJ%#CT) 

334 IFJ=255G0T037A - 

935 IFJ>160T0945 

340 0070955 

245 IFCT<6G0T0910 
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958 50502830: БЕТПЕН 


955 0 
Эта RI 
1818 
1820 
1030 
1949 
1942 
1842 
1944 
1045 
1046 
1056 
1076 
1875 


6 Dep: Be 


© IFMECR1.B1»-1G0T012428 


HCTGOSUB?18. 738, 758, 778. 798. 818 
ETURH 
BETIS: GUSUE ALR IFIf-""GOTO1:818 

d "THENJ=DJ : DI=DI TIIS-J: 00701188 
J=-DI : DI=J:GOTO1196 
AJ=AJ+DJ : GOTO1G76 
THEHGOSUESEI):GO0TO1818 
IFR=134THEHFL=1: AE a 
IFA=125THENFL=1 : 505082918 
IFA=133THENFL=6 Ers 5 GOSUB281A 
IFI$="Z"THENFRINT" 7" : GOTO7S 
50701100 
IEN pt, AJ)=255G0T01210 
IFHECRI, 1THEHMAZCRI.RJo-2:GOTO168 
RISRI-DI:BIsRJ-DJI:GOTO1816 
FRIHT"Z":GOSLBSes : 00701919 
PRIHT"Z" 
І=Е+79:РОКЕІ, 67 :РОКЕТ+21,74:РОКЕТ +2: 
РОКЕІ+43, 233: РОКЕІ+44, 1680: POEEI445, 
PRINT" isiitibpbipkEnu МОН CHERI!" 
PRIHT"EMMBITEMPS TOTAL: ";MIDESTIE 
DGOTO cp 
DEFENS CX) = TE BSSHDC L E 
FORI=1TOM-1 Кы 
MECI,G 
Me2:FüR 


3: POKEI+22,75 


";RIGHTFCÉTI#. 27 


Na 
ï IFRHDC 134. 5ТНЕНЯ=1 : Рей 
IEN I. J)=1G0T01326 
A1=K+A*2 : Еж: IFA1CGOURA1>MORE1<G0RE1>7MTHENNERXT : NEST : GOTOL6GA 
1THEHHEXT : NEXT : GOTO1 ep 
Nep) :Y=B1 MACH, i=l: GOSUB1550 
DEZ: B1=Y+E#2 : IFA1CGORA1>MOR 


IF CA ; E1 -4ITHENMZ CHAA: + 
R=B: B=—1 : IFRNDC1)<. STHENA 
IFMZCI+R. J+B)=GTHENT=A : :B=T 

MC Ie. J: НЕХТ : NEXT : GOTO1 EBE 

MACHER. Wi iWTHli: Y-B1:MACH, Wich: GOSUB15SG : GOTHI 
HA=RND<1 3 : rue: STHENA=1 : RETURN 

IFHA<. 5ТНЕНН=! 1: RETURN 

IFHA<. FSTHEH F=@: RETURN 


1: NEXT : HEXT : GOTO 1699 
n 


5 А=8: В=-1 : RETURN 


IFE=GTHENE=FNHACR9 : GOTO1568 

RETURH 

AI=FNR<CM) : RTeFHRCM? : EHS CDI. AJ2C2G0T01E66A 
DI=E: DJ=A : RETURN 

РВІНТ "1"; :POKE26279, 14 5 
FÜRI=ATON ` FOR-J=8TOM 


ВЕМАСТ, ТУ: IFRCƏTHEHPRINT" 34 тш"; 20002040 
IFA=2ANDFT=1THENPRINT "Gï. " ; : GOTO2040 

PRINT" "; 

NEXT : PRINT : NEXT : IFFLTHENPRINTLEFT£ CV, BL e1 2 SPCCRTO " stk" 
РОКЕ198, B: HRIT198, 1: PÜKE197. B: P0KE36829, ®:ЕЕТШЕН 


1=Е+497 
IFTI<T+EGTHENRETURN 
РОКЕІ, 48+YAL CMIIFCTIE. 6.159: PFOKEI--1;42+YAL CHITECTIS, S. 12) :PÜKEI-Z 
POKEI-2.48+YAL(MIDECTIS: 4, 122: POKEI-4;:48+VALCMIDFCSTIF. 2. 122 

T=TI : RETURH 

GOSUBSGSA : PRINTSPCCI1»"TTITR"EORCDIM1. DIei 
PRIHT"H"; :FORI=1TOFE PRINTEPC Ce" "HEN 
FRIHT'"H"SPCCR» POS :FÜRIS1TU3:PRIHMTSPCCSAE13: МЕ: 


DL 1 TO AAA : NEXT 
TURN 
:PRINTSPCCS)B2# : RETURN 
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> 


GOBBLER 


Vous n'avez pas exterminé tous les fantômes 


de notre chère planète. 


Il en reste encore quelques uns retranchés dans un labyrinthe, 


leur lieu favori de repos. 


BUT DU JEU 


Dévorez un maximum de pastilles énergé- 
tiques, pour ensuite affronter les fan- 
tômes du labyrinthe. Par chance, ceux-ci 
ne se déplacent pas, il est donc très facile 


de les anéantir. Votre temps de vie n'est 
pas inépuisable, alors faites vite. 


AU CLAVIER 


- Vous déplacez votre enzyme glouton à 
l'aide d'une manette de jeu, il peut donc 


aller dans quatre directions. 

- Ce logiciel nécessite l'utilisation d'une 
extension 3 Ko RAM super expander, qui 
permet de commander le joystick dans le 
logiciel. 
---------------- 


SE 
РОКЕЗЄӨ 3 
PRINT een, DEER 
PRINT". . 
PRINT SEREH... 
РЕ1НТ"®...й#„ж*#,й,., 
PRINT, 6,6, HE, ЕМЕ, ? 

PRINT. H. ERAS. CELL LLL LL 
FPFINT"#, OE M S 8. | " 
PRIHT". SS, 


M COPYRIGHT TILT MICRO 


о تو‎ um Л > LO f б 


© 


PRINT"... 
PRINT "RE 
2 RESTORE : FOI 
DATALGZ 46,4 


:С5=277:НВ=НВ+1 :TI$=" 0000H" : 


B: IFTI218308THEHHB=B:G0OT01810 
PEEK (15 


RE GOTO128 


Lu, 2 POKEX 81:GDTO148 


+92 Eder FOKE36875, 219: SS=TI : BAZ=1 


ADE: POKER, B: РОКЕЗӢТ20+А,2: NEXT 
,46,182,46,46,182,182,102,182,102,46.182,102,1й2,102,4 


ME=ME+S : 


7B2ANDX+WZ<C=212S5THENYZ=W7 : 60T0138 
WEE /THEHVZ-B : 6070159 


m 


1 
SS=9:RE=RE-.675: BAZ=1 


134 
135 
EH1 
146 
141 ñ 
142 
143 
144 
145 С 
146 
158 
151 
152 i532 THEHPOKER, 87 
188 GOTOLAG 

1888 IFTI-SSCS10THEHSC-SC«580: MsIH-1:PDKEN- VI; 32: POE 
1818 IFME-BTHEHPRIMT' XINNKNANKERNBBBBISGHME OVER" : FOE 
птпэййй 

1020 МЕ=МВ-1:РОКЕХ,Ф2:РОКЕХ— 
EAB PRINT" ISC"; SC; TABIA) INE; :R=TI-SS 
2661 IFRCSBBTHENPRINT"TIMEX:"; INT ERZE 
8965 ТЕВАХТНЕМВАХ = :РОКЕЗ6875, 237 : FÜRC-1TOSB: NEXT : POKE? 
8818 PUKEGESTS, O:PRINT"TIME:":RIGHTSCTIS, 3) : RETURN 
9000 RESTORE : GETA# : IFSC>HITHENHI=SC : INPUT"ZMEILLEUR SCORE !AM/OTRE PRENOM SVP 
im 

S941 SC=0:MB=2Z:MB=25:POKE26873,25:PRINT"IW" RE=1 

3885 PRINT" GOBELER" 

3096 PRINT :PRINT:PRINT :PRINTTAE(S) ; "USE" PRINT: PRINT" JOVSTICK OR KEYCORD" :FRIHT 
3818 PRIMTTRECIOO;"SHNHNIC CNE" 

9845 PRINT"XMNEMBBELSH F1 TO BEGIN" 

9888 ІЕРЕЕКС1979С>23ЭННШӘТПРС09<12ЗТНЕМӘй5Й 

Эй?й PRINT"; TRECE? ; "VRLUES" 

5100 PRINT : YOU (a РТ)" 

3110 PRINT", : FOOD (18 PT 
9120 PRIMT"NMME : VITAMIN (188 PTS) 
9138 PRINT" : MONSTER (500 PTS) 
3158 PRINT" Minah EXTRA HUMAIN" 
9185 POKE36872. 18 

9160 PRINT” 


=1 Tüm : NEXT 
32: FORA=1TO1666 : NEAT : POKEX 21: GOTO AG 


: RETURN 


OR EACH EDOARD" 
SCORE : ";HI 
A 


18884 PRIMTPEEKCiS?? 


` DGOTO 108000 
13588 IFReSSURR-ESDO0RREESÜRH-SBTHEMSCESC 
a 


READY. 


=] POKER, 32: FOK 81:50Т7014 


Š 
à 
3 


ABLE! 


EXPÉDITIONS, RALLYES, RAIDS ET COURSES @ L'ÉCOLE DE L'AVENTURE @ 
LES PARADIS PERDUS @ TRAVERSEZ LE SAHARA EN 4 X4@ `< > ` 
ALA RECHERCHE DES TRÉSORS OUBLIÉS @ VOTRE TOUR DU MONDE 
A LA VOILE € TROUVEZ UN SPONSOR @ TOUTES LES FETES DU MONDE 
f LES VOYAGES INSOLITES ET SPORTIFS Ө @ @ `` ; 


GLOUTON 


Voilà un jeu pour les mordus du labyrinthe. 

Les gourmands ne sont pas en reste 
puisqu'ils devront ingurgiter un grand nombre de pilules 
afin d'apaiser une boulimie démente. 

Le temps fera office d'ennemi. 


BUT DU JEU tilles et ce, bien sûr, dans un minimum de - Descendez avec «б». 
temps. 


- Allez à gauche avec «5». 


Le jeu consiste à diriger votre glouton à + - Allez à droite avec «8», 
travers les méandres d'un labyrinthe ой [ AU CLAVIER 
vous devrez avaler le maximum de pas- - Montez avec «7». 


DIDY Di m 


2 THEN LET 
THEH LET 
THEN LET 
› THEN LET 


OR U=27 THEN GüSUB 2000 
114 LET Т®=5ТЕ% TP 
115 PRINT AT 19,11;T$ 
ï THEN GOTO 
ы „Ше. г uton Иш d 
"LE JEU COMSISTE À DIRIGER VOTRE " 
"GLOUTON С" "снн ә POUR AVALER LE " 
"MAXIMUM DE PASTILLES ("wl "sy ET — " 
"CECI ЕН UN MINIMUM DE TEMPS." 
РЕІНТ 
FEIT " HRUT : Z BAS e 
& 5 


PRINT 
IF IH 
RETURN 


xs a" 
IR UNE TOUCHE..." 
Evg="" THEN GOTO 285 
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1ййй PRIHT 
Й PRIHT : 


РЕІНТ 
FRIHT 
PRIHT 
FRIHT 
FRIHT 


d 

й PRINT 

à FRINT 
FRIHT 
FEINT 

B РЕЇНТ 
PRINT 
FRIHT 
FRIHT 


RETURN 
3 


& PRIHT " BRAVO VOUS À 
РЕІНТ 
539 PRIMT "Н MANGE 
S40 РЕІНТ 
PRINT. "UNITES DE TEMPS..." 
Й FOR Мей TD 
1570 НЕФТ H 
û GOTO 
LET 1й 
PFIHT AT 18:11:80 
D БЕТПЕН 
Я FÜR Мей TO 45 
PRINT RT 6,11: "PERDU"; AT 6,11;"Perdu" 
à HI H 
1 PRINT RT 


21,8: "UNE AUTRE PARTIE 7" 


п" THEN RUN 5 
H" THEN STOR 


APPONTAGE 


Vous devez faire atterrir votre hélicoptère 
sur un porte-avion par mauvais temps. 
Aussi, accrochez-vous aux commandes de votre ZX 81. 
' = 


raison de votre appareil. - Allez à gauche à l'aide de la touche «5». 
E - Allez à droite à l'aide de la touche «B». 


Se poser tant bien que mal sur le pont du AU CLAVIER 
porte-avion en tenant compte des vents - Montez à l'aide de la touche «7». 
latéraux violents qui pourraient bien avoir — - Descendez à l'aide de la touche «б». 


5 CLS 
18 PRIHT " HELICO-BRSE" 3 ы 


ER ES 


1ййй 
1010 
1050 


1100 
BU 
1185 
1147 
1198 
1189 
1118 
1128 
1138 
1148 
1999 
2009 
2018 
2029 
2030 
ada 
3010 
saecu 
3838 
3500 
3518 


ama 
айай 


saan 
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Semen 


FRIHT 

FRIHT 

FRIHT ‘VOTRE МІ 

PRIHT "POSER 

PRINT 

FRIHT 

PRIHT 

PFIHT 

PRINT " S=GAUCHE S-BHS 
7=HAUT 8=DROITE" 

FRIHT 

FRIHT 

PRINT " FRESSEZ UNE TOUCHE..." 

PRINT AT B,3;"Whelico-baseW" 

GOSUE zee 

FRIMT RT B.3;" HELICO-BASE " 

GOSUE ZAA 

GOTO 18 

FOR М=1 TD 5 

IF INKEY%<>"" THEN GOTO 493- 

HEXT Н 

RETURH 

CLEAR 

LET L=INT CRNDE2? 


AYER DE VOUS ^" 
ЕС VOTRE a 
RE SACHAMT QUE LA FORCE " 
PIRRHTE VIENT DE L""QUEST OÙ DE " 
EST," 


CLS 

IF Leg THEN GOTO 688 

PRINT "LA FORCE VIENT DE L""EST" 
LET F=1,5 

GOTO von 

PRINT "LR FORCE VIENT DE L'OUEST" 
LET F=-1,5 

FÜR Мей TO 100 


3 NEXT H 


DLS 

LET R-ü 

LET B=16 

FRINT RT 18,.8;" Wo ---------------- E n> 


PRINT RT R.B-1;" "AT REISBSU == "SRT BFR" жЕр "AT RES 
ша о" 


FRINT RT Н+4,Б;" Е 

IF А=16 AND Beie THEN GOTO 2000 

IF В=16 AND (B=12 OR B=13 DR В=14 OR Б-15 OR В=19 OR B=18) THEN GOTO 3500 
IF B»24 OR B<2 THEN GOTO Sean 

LET B=B+( INKEY$="8" AND B<27)-( INKEY$="5" AND Б>Й› 

LET R=R+úIHKEY$="6" ›— CIHKE =" T" AND R28» 

PRINT НТ R*1.B-1;" 

IF INT CRNDE25=0 THEM LET В=В+Е 

GOTO 1898 

FOR Н=8 TO @4й 

PRINT RT 21,5;"NmissionlaccomPlie";RT 21.5;" MISSION ACCOMPLIE" 

НЕХТ H 

GOTO аййй 

FOR Мей TO 20 

PRINT RT 21,3: "чате 1 Beau... "AT 21,35" DANS L ERU..." 

НЕХТ H 

GOTO 4888 

FOR Мей TQ 30 

РКІМТ AT 21.3;"NMecraselisurMlalbaseNMÉClottante";RT 21,3;" ECRASE SUR LA BASE 


FLOTTAHTE" 


НЕЯТ Н 

PRINT RT 21,0;" UNE AUTRE PARTIE COUI/ZMON? f? — " 
INPUT 2% 

LET Z%$=Z%< 1 5 

IF 2%="П" THEM RUN 

IF 2%="Н" THEN STOP 

GOTO 4810 

FOR Мей TQ 30 


5010 PRINT AT 21.0; Mous BetesMasPire...";AT 21,8;" VOLS ETES ASPIRE..." 
5929 НЕХТ H 

5934 GOTO 4989 

2990 SAYE "HELICO-BRSe" 

9999 RUN 


ZIG-ZAG 


Pour les amateurs de courses automobiles, 
un petit jeu qui saura les ravir. 
Les réflexes et la connaissance de la piste apparaîtront 
comme un avantage certain, mais demanderont 
quelques parties d'entraînement. 


% 


BUT DU JEU autres. pièges spécialement conçus pour AU CLAVIER 


Faites le maximum de kilomètres sur le - Aller à droite et à gauche à l'aide des 
Circuit en évitant les sorties de route et touches «8» et «5». 


PRINT 
FEIT A 


1 AND Б>1й THEN LET B= 
THEN LET A=A+1 
2 THEN LET B-B*1 
IF ІМКЕҮФе"5" THEN LET 
IF IHKEY%="8" THEN LET 4 
K=A OR К=Б THEN GOTO 5а 


51 FRIHT RT 21.K;"BQUM" 
52 PAUSE 1йй 
5з GOTO 24 


189 


Ka LA MAISON DU SAVANT FOU 


Avant de décider de pénétrer 
dans la maison du savant fou, n'omettez pas de rédiger votre testament 
car rien ne vous sera épargné. 
Tentez d'en ressortir vite (et vivant) car vous étes d'ores et déjà 
convié à visiter la résidence secondaire 
du savant en question. 


È danger. Si vous réussissez cette épreuve, 
BUT DU JEU ce qui est réellement un exploit, vous AUCLAVIER 
Évoluez le plus longtemps possible dans aurez droit de visiter la résidence secon- - Donnez libre cours à votre imagination. 
une maison où toute action constitue un daire du savant fou. 
1 EEN LA MAISON DU 5 
18 CLS 


HT FOU 


e © 
PRINT "VOUS ETES DEVANT UNE MAISON. 
INFUT 2% 

IF 2%&1 
IF 2 


QUE FAITES 


E" THEN GOTO 194 
R" THEN PRINT "ALLONS, UN PEU DE COURAGE..." 


NT "LA PORTE VIENT DE SE REFERMER DERRIERE VOUS..." 
UE BOUCLE 
FOR U=5 TO 1 STEP -1 

© 


INT +. "CYOUS AVEZ ";U;" VIECS) 


QUE FAITES-YDUS 7" 
IHPUT A$ 

IF Dënn THEN GOTO 238 

FÜR Hei TO 12 

IF C R,H3=F80 13 THEM GOTO 298 
HEST H 


5 
FRINT "ERREUR" 
FOR Gel TO 50 
xT G 
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<" THEN GOTO 


FR. H+1 TÜ NEZO 


QT 
FRINT 


5 ETES-DANS LA CUISIHE.IL Y 


ERRIERE LA FORTE SE TROUVRIT 
ВРАТЕ." 


à L""ENTREE DE LA 


ENT LE GAZ." 


HISIE DAI 


RETURN 
"LHE БЕТЕ EXTRAVAGANTE VOUS DE- 


2» 
ЕН 


7125 КЕТПЕН 
Эййй PRIMT "V 


QUE LA DESAM 
Sens PRINT "V 


ETES DRHS LR FEHDERIE.IL Y 
- BRE DE 


LR СНЯМ-БЕЕ A GAZ ET VOUS ETES MORT." 
S VOUS TROUVEZ RU FUMDIR.IL YR UHE FORTE A L""EST.RU SUD ET ñ L°" 


US AVEZ ACCEDE A LA PIECE SE- CRETE. CA SENT LE SANG. IL f A UNEFORT 
DUEST ЕТ UNE TRRPPE À L'""EST," 


TIZA PRINT "ERAYO. VOUS ETES AU LABO MAIS RT-TEHTION.CH SENT LA FOUDRE, Tied 
Н UNE FORTE AU SUDA L""EST ET Rñ L""DIEST. " 


ETES FRESQUE AU BOUT DE VOSPEIMES...lHE BOMBE A ETE PLRCEE ET P 
ÜM-POSEREZ UM CODE DE 1 R 59.MAIS VOUS H""RVEZ QUE S CHANCI 


R UNE PORTE A L'""OLES 


UHE USINE DE CORNEED-E 


EF. VOUS 


MBISOH.IL Y ñ UNE FORTE ñ L""EST.R 


Н UHE ТЕНРРЕ AU NORD ET UNE FÒRT 


VOUS VO 


LRHEHTRBLEMENTEH B 


SINUS. OH SENT DU УЕНТ. IL Y 


GAZ. IL Y A UNE FORTE FOUR CHAQUEDTIRE 


CHIQUETTE LE CORFS 
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> 


INT CFHD#50 +1 
Tü 5 


LET 
FÜR F= 
IHPUT ñ 

FRIHT 

B IF Н=Х THEN GOTO 9188 

IF Н> THEN PRINT "LE CODE EST PLUS PETIT." 

IF A<# THEN PRINT "LE CODE EST PLUS GRAND." 

НЕХТ F 

CLS 

FRINT "LA MAISON A YOLE ЕН ECLAT. VOUS ETES MORT, C""EST DOMMAGE, SI 
DU BUT..." S 
GOSUp BOUCLE 

HEART U 

GOTO ээйй 


â CLS 
FEINT "ERAVO. YOUS ETES SORTI DE CETTE MAISON INFERNALE.UNE SURPRISE VOUS 


EMARREZ LE MAGHETO ЕТ APPUYEZ SUR newline" 
Ү%=СНЕ% 118 THEN GOTO 9140 

GOTO 9125 

LüRD "COSINUSZ" 

EM L9C0STHUSZ 


Tü 158 


ни5а" 
1 REM S61C0STHUS1 
3 CLEAR 
ELS 
0 PRINT LA MAISON DE CE FOU DE 
SAVANT COSINUS" 
FRIHT 
FRIHT "VOUS ALLEZ ЕТКЕ ENFERME DANS UNEMAISON DIABOLIQUE EN ESSAYANT DETROL 
„P IS0RTIE ra" 
PRIMT sosar 
PRIHT " CAVEC 5 VIES>" 
E PRINT 
PRINT "ТЕМТЕР YOUS VOTRE CHANCE 7" 
5 FRINT 
FOR Т=1 TO 5 
INFUT 1% 
DF QUI" THEN FUH 
IF ІФе"МОМ" THEN PFIHT "ALLONS UN FEU DE COURAGE, " 


MEXT T 
3-CLS 
PRIHT "ON H""ECHRPPE PAS RU SAVANT COSINUS..." 
FÜR Wei ТП 58 
MER 


PRINT "DESOLE MAIS VOUS N""RVEZ PLUS DE VIE..." 
GüsUB BOUCLE 
GOTO seas 
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«* LA RESIDENCE SECONDAIRE DU SAVANT FOU 


La visite du domicile du savant fou 
n'est pas une sinécure. ( 
Vous replongez dans cet univers hostile construit entiërement 
sur les délires et les fantasmes démoniaques 
de cet esprit du mal. 


veau être confronté à un grand nombre de 
- BUT OUEN situations dangereuses. De plus, vous de- [ EE 
A l'instar de la première excursion, (voir la vrez faire preuve d'un grand sens logique - Prenez vos responsabilités. 
maison du savant fou), vous allez de nou- еї d'un courage certain 


— 


"OB1EA3NASSR" 


1 FRIHMT "VOUS ETES DEVANT LA RESIDENCE SECONDAIRE DE COSIHUS. QUE 
FAITE-YQUS 
195 FÜR R 
118 INPUT Z$ 
128 IF 2%&1 
139 IF 2%1 
144 HEST R 
1зй 
191 PRINT "LA FORTE VIENT DE SE REFERMER  DERRIERE YOUS. VOUS ETES MOM FRI-SOMM 
IER...HE,HE,HE „" 
GOSUEB BOUCLE 


Tü 5 


" THEN GOTO 198 
<" THEN PRINT "ALLONS, UN FEU DE COURAGE, .." 


OR еб TO 1 STEP -1 

B CLS 

81 LET A=3 

2 PRINT ,,"CVDUS AVEZ ";U;" VIECS) 
FOR R=1 TO 4& 

204 НЕХТ F 

205 CL. 
210 LE 6990+10*R i 

215 HT ss 

вай PRINT "QUE FAITES-VOUS 7" 

239 INPUT АФ 

IF A$="" THEM GOTO 230 

FOR H=1 TD 12 

1 IF ERA, H3=R$C 1 > THEM GOTO 388 
Su NEXT H 

568 CLS 


2: 
zn 
E 
2 
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= - =) 


5 PRIHT "ERREUR" 
6 FOR Gel TO 55 


2 ›="Е" THEN GOTO 268 
3 IF BCA, H+ " THEH GOTO 5584 


AL CBECR.Hel TÜ Нәр)» 
1 TO 48 


LET A=! 
FÜR 
HEST G 

ELS 

GOTO 219 
FRINT "QU. 


£n mcn 


S ETES TOMBE DANS UH BAC D""RCIDE.VOUS ETES RONGE JUSQU" All 


GOSUB BOUCLE 


? 

Fans HERT U 

ТИЙЕ GOTO Dan 

ТІЙ PRINT "YOUS ETES DANS LA CUISINE. UNE O-DEUR VOUS PIQUE LE NEZ.IL Y À ИНЕ 
RTE Н L""DUEST.R L""EST ЕТ RU NORD. " 


RETLIRH 


PRIHT "VOUS ETES DANS L""EHTREE DE LA MAISON. IL Y A UNE PORTE А L""EST,R 
WEST ET AU NORD, " 


5% PRINT "YOUS ETES DANS LA PEHDERIE.IL Y A UNE ТЕНРРЕ AU NORD ET UNE FÜRT 
L'UQUEST, " 

7935 БЕТПЕН 

7844 PRINT "VOUS VOUS TROUVEZ DANS LR CHAM- BRE DE COSIHUS. IL Y ñ UNE PORTE A L" 
"EST,RU SUD ЕТ AU- NORD." 

7645 RETLIRH 

ТЙӘй PRINT "Vols VOUS ETES FAIT EMBROCHER PAR DES PICS,VOUS ETES MORT." 

7455 GOTO 7003 


"pen PRINT "YOUS ETES AU SALON. IL f A DE L""ELECTRICITE DANS L""RIR... МО 
Y À UNE PORTE POUR CHAQUE DIRECTION, " 
7965 RETURN 


see FRIHT "UM LASER: PLACE SOURNOISEMENT SURLE MUR, VOUS DESINTEGRE, .." 

TAS GOTO Tama 

7889 PRIHT "VOUS VOUS TROUVEZ DANS LA SALLE DE BAIN.CA SENT LE GRZ.IL Y A UNE 
FORTE AU HORD.RU SUD ET A = L""OUEST." 

7935 RETURN 

7894 PRINT "LA FORTE DONNAIT SUR UH PRECIFI-CE.VOUS VOUS ECRRSEZ EN BAS..." 

Tess GOTO 7883 

7100 PRINT "YOUS ETES AXPHIXIE DANS LA CHRM-BRE ñ GAZ ЕТ VOUS ETES MORT," 

7105 GOTO 7003 

7110 PRIHT "LIN MANIAGUE CACHE DERRIERE LA PORTE VOUS FULVERISE LA TETE A COUR 
DE MRSSE..." 
7115 GOTO Tau 

7128 PRINT "YOUS VOUS TROUVEZ AU FUMOIR.IL YA UNE PORTE À L""EST.RU SUD ET À L"" 
DUEST.RTTEHTIOM, OH ENTEND UMERESPIRATION, " 

7125 RETURN 

7130 PRINT "YOUS ETES DANS LA CHAPELLE. IL Y A UNE FORTE DANS CHAQUE DIREC- TION 


7135 RETURH 

7140 PRINT "YOUS AYEZ ACCEDE А LA FIECE SE- CRETE.CA SENT LE GAZ. IL * A UNE PORT 
E RU SUD,A L""DLUEST ET UNE ТЕНРРЕ RU HORD." 

7145 RETURH 

7150 PRINT "VOUS ETES BROYE DAMS UH ETAU, ET YOUS ETES MORT." 

7155 GOTO Райз 

7164 PRINT "BRAVO,PAR LE BIAIS DU SDUS-TER- RAIN, VOUS ETES AU LABO, MAIS НТ- ТЕНТ 
ION: CÀ SENT LA DYHRMITE.IL Y ñ UNE PORTE DANS CHAQUE DIREC-TION," 

71658 RETURH 

7170 PRINT "EH OUVRANT LA PORTE, YOUS AVEZ RENVERSE DES TUBES A ESSAIS СОМ-ТЕМН 
HT DE LA NITROGLYCERINE GUI A EXPLOSE NATURELLEMENT ЕТ YOUS AVEC." 

7175 GOTO 7903 

Saaa PRINT "BRRVISSIMO, VOUS ETES DOUE D""LIH SENS DU HASARD INCROYABLE. MAIS MAL 
HEUREUSEMENT, LR FORTE EST ` VERROUILLEE PAR UN CADENAS ELEC-TROMIQUE, INSERREZ-Y 


L VOTRE CARTE БЫ AFFUYANT SUR ""I""." 
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INPUT I$ 


ELS 

РЕІНТ "YOUS Н""НУЕ2 VRAIMENT FAS DE CHANCE : LA CARTE QUE WV = ШТІ 

A UN CODE QUI H""EST FAS BOH. 

FRIHT "РОЦЕ CORRIGER CE CODE: YOUS UTI-LISEREZ ЫМ STYLO МАБМЕТ AYECUH C 
DU CODE, " 


DDE DE 1 ñ S9.L""BRDIMRTEUR DE CONTROLE VOUS DIRA SI VOUS 
5 PRINT 
PRINT "VOUS AVEZ 6 CHANCES. "s+, 
LET М=ТНТ ¿RHD239 341 
642 FOR Н=1 ТО 6 
INPUT D 
IF D<X THEH PRINT "LE CODE EST PLUS GRAND." 
й55 IF D>» THEM PRINT "LE CODE EST FLUS PETIT." 
й ТЕ De THEN GOTO 9186 
NEXT H 
2 CLS ] 
PRINT "DESDLE. LA CARTE MAGHETIQUE EST FOUTUE.VQUS ALLEZ VOUS TROUVER DANS 
PIECE AU HAZARD..." 
GOSUB BOUCLE 
A LET Z=IHT CRHDX14O41 
IF 2-3 OR 2-1 OR Z=6 QR 2-8 OR Z=10 DR 2-11 OR 2=12 THEN GOTO 9878 
B LET A=Z 
GOTO 285 
CLS ç 
B PRINT "BRAVO, FELICITRTION.VDUS AVEZ REUSI ñ SORTIR DE CES LREYRIN- THES 
ST OÙ JAMAIS YU DANS ^ L'""HISTOIRE DU JEU D""RVENTURE. " 
2 GOSUB BOUCLE 
9115 GOTO 9115 
1174 STOP 
9500 FOR Yel TO 150 
9510 НЕХТ Y 
Э52й RETURH 
Э6йй SAVE "COSINUSá" 
ЗЕЙ) REM S61CUSINUS2 
3605 CLEAR 
9618 CLS 
3620 PRIMT "LA MAISON DE COSINUS DEUXIEME PARTIE. " 
8628 PRINT "APRES LES PERIPECIES DE LA PRE- MIERE MAISON, VOUS VOUS TROUVEZ DEVA 
NT LR RESIDENCE SECONDAIRE DE COSINUSCENCORE PLUS AFFREUX," 
9630 PRINT ,,,,,, 


9635 PRINT " CRVEC 6 VIES)" 
36 PRINT 
PRINT "TEMTEZ-YOUS VOTRE CHANCE 7" 
PRINT 
FOR R=1 TO 5 
INPUT 1% 


IF IS$-"OUI" THEN RUN 

IF 1$="NON" THEM PRIHT "ALLONS, UN PEU DE COURAGE." 

NEXT R 

ELS 

PRINT "ON МЕ PEUT PAS ECHAFFER AU SAVANT COSIHUS,.." 
1 FOR Е=1 TD 50 


FRINT "DESDLE MAIS VOUS N""AVEZ PLUS DE VIE..." 
GOSUB GOUCLE 

PRINT "RU REVOIR..." 

PRINT "J""RI BIEN RIGOLE." 

PRINT ,,.,"IMSCRIRE RUN РОЦЕ RECOMMEHCER. . . " 
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.. MARDI — 
CEST LE JOUR DE 
TELE POCHE! 


LISTE 


DES POINTS 


06000 
06010 
08600 
10000 
11000 
11000 
19000 
13004 
13005 
13006 
13200 
14000 
16000 
18000 
19100 
19100 
21000 
24100 


25006 
26000 
26500 
29000 
30000 
31000 
33000 
33800 
34006 
34900 
34500 
37170 
38500 
39000 


41500 
42000 
42100 


49300 
44100 
45000 
47000 
29000 
29300 
54000 
56000 
56100 
57504 
57800 
39000 
39000 
39400 
39500 
59800 
60108 
60200 
63000 
64110 
64600 
66000 
67150 
68000 
69003 
69400 


70000 
71100 
71400 
79000 
73100 
74109 
15001 
15005 
75006 
75008 
75009 
75009 
75009 
75010 
75010 
75011 
75011 
75012 
75014 
75015 
75015 
75016 
75016 
76600 
76600 
76600 
77000 
80000 
83000 
86011 
87000 
89100 
89100 
91910 
92100 
92100 
94100 
98000 
88002 


DE VENTE 


MAO'S - МСЕ. (93) 880479 
ÉVOLUTION 9000 - MANDELIEU - (93) 4981,61 
MICRO BOUTIQUE JCR - МЕТ - (24) 550153 
MICROPOLIS - TROYES - (25) 72.03.79 
Ï ELEC VIDEO CLUB - CARCASSONNE - (68) 470894 
R 2 1 INFORMATIQUE - NARBONNE - (68) 65.15.83 
BASE 9 SOCODETI - RODEZ - (65) 42.50.05 
ALLIANCE - MARSEILLE - (91) 863599 
ELP INFO - MARSEILLE - (91) 9491.13. 

МО SYSTÈME - JCR BOUTIQUE - MARSEILLE - (91) 374233 
LUDO - ARLES - (90) 96.79.03 
OMEVASSARD TLUETTE - CAEN - (31) 934809 

` SA LHOMME - ANGOULÈME - (45) 92.27 37 
AVENIR INFORMATIQUE - BOURGES (48) 65.16.57 
MICROMATIC - BRIVE - (55) 87.1817 
INFORMATIC 19 - BRIVE - (55) 87.7708. 
OMG. MICRO LEADER - DUON - (80) 30.12.70 + 
MICRO CYRANO INFORMATIQUE - BERGERAC 
(16) 56.06.06.12 + 
ПА MONTBELIARD - MONTBELLIARD CEDEX - (81) 94.50.65 
DOMICA - VALENCE - (75) 41.14.75 
ECA ÉLECTRONIQUE - BOURG-LES VALENCE - (75) 42.68.88 
L'ORDINATEUR 99 - QUIMPER - (98) 95.92.70 
DISCOUNT INFORM. SERVICE - NIMES - (66) 937491 
MICRO DIFFUSION - TOULOUSE - (61) 9981.17 
MICRO DIFFUSION ` BORDEAUX - (56) 81.11.99 
ETS COCA - BORDEAUX - (61) 92.91.78 
РВ . JCR BOUTIQUE - MONTPELLIER - (67) 588437 
BUREAU ORGANISATION - SÈTE - (67) 743410 
MARCELLEC - BÉZIERS - (67) 313765 
UM - CHAMBRAY-LES-TOURS - (47) 27.29.00 
MICRO AVENIR - VOIRON - (76) 65.72.55 
MICRO 39 - JEAN-PIERRE-ANDRÉ - LONSLE-SAUNIER 
(84) 24.45.39 
-TAM - MER - (54) 81.6047 
DETROIT INFORMATIQUE - SAINT-ÉTIENNE - (77) 335859 
` SAINT-ÉTIENNE COMPOSANTS - SAINT-ÉTIENNE 
(77) 335014 
MICRO SYSTÈME RHONE-ALPES: ROANNE - (77) 68.87.99 + 
SILIÇONE VALLÉE - NANTES - (40) 73.91.67 
` TÉLÉPHONIE BIS - ORLÉANS - (38) 54.34.34 
JULIEN ÉLECTRONIQUE - AGEN - (58) 66.55.64 
` TEMPS X - ANGERS - (41) 889507 
CHOLET INFORMATIQUE - CHOLET - (41) 46.02.40. 
` SÉREC - NANCY - (8) 3321260 
L'ORDINATEUR 56 - VANNES - (97) 42.52.00 
L'ORDINATEUR 56 - LORIENT - (97) 6459 54 
ARGO INFORMATIQUE ` SAINT-AVOLD : (87) 92.54.84 + 
СМР. FREYMING MERLEBACH - (87) 81 14 89 
7 ETS BOULANGER - LILLE - (20) 54 98.75 
ВСУ INFORMATIQUE - LILLE - (90) 9233.06 
` MICROSHOP - CAMBRAI - (97) 81.9809 + 
CID - DOUAI - (97) 88.47.90 
= MBDC - ULLE - (20) 5791,87 
QUENEUTTE - CREIL (4) 495-0450, 

LARDET SA. - COMPIÈGNE > (4) 49307 86 
IMPACT - CLERMONT-FERRAND - (73) 92.17.55 
ESPACE MICRO 64 - BAYONNE - (59) 59.41.55 

INFORMATIQUE BASCO LANDAISE - ANGLET - (59) 31.96.05 
SÉRIE INFORMATIQUE - PERPIGNAN - (68) 34.00.11 
ETS À FRITSCH - ERSTEIN - (88) 98.03.51 
ELB. + COLMAR (89) 23.68.35 
BIMP. - LYON (7) 8608497 

` MICRO INFORM BEAUJOLAISE - VILLEFRANCHE-S/SAONE 
EE 

= ÉLECIRO BOUTIQUE - VESOUL - (84) 76.49.52 + 
AVENIR ÉLECTRONIQUE - CHALON/SAONE - (85) 48 7335 
CH. ÉLECTRONIQUE - AUTUN - (85) 50.7096 
HICROTIQUE AESCULAPPLE - LE MANS - (43) 249780 

7 L'ORDINATEUR - ALXLES BAINS - (79) 881907 
DSA MICRO - ANNEMASSE - (50) 38.31.40. 

VIDEO SHOP - PARIS - (1) 299395 
HACHETTE - PARIS - 633.84.68 

DURIEZ S.A. - PARIS - 3290540. 

ENERGY 8 - PARIS - 293.41.33 

LE JEU ÉLECTRONIQUE - PARIS - 526.69.93 / 8744350. 
LPS BUREAU - PARIS - 878 06.45. 

LCR ÉLECTRONIQUE - PARIS - 989 19.80 
(GÉNÉRAL VIDEO - PARIS - 206.50.50 

LOGIC STORE - PARIS - 206 72.08 

COCONUT INFORMATIQUE - PARIS - 3556300 
PITS. - PARIS - 254 38.0 

ELUX - PARIS - 307.65.58 

MIDEF - PARIS - 539.98 68 

JCS. COMPOSANTS - PARIS - 3559522 
ILLEL CENTRE - PARIS - 5549748 
PENTASON(C - PARIS - 5242316 
ANTIGONE - PARIS - 143.1341 

MICRO MAX - LE HAVRE - (35) 41.77.47 
VP. BUREAU - LE HAVRE - (35) 484921. 
L'ORDINATEUR - LE HAVRE - (35) 91.5455. 

- EPSILON - MELUN - 437.51 95 
LOGIC - AMENS - (22) 955484 
PSI. ÉLECTRONIQUE - TOULON - (94) 93.11.20 
LISTE INFORMATIQUE - POITIERS CEDEX - (49) 414386 

` MICROLIM - LIMOGES - (55) 34.10.19 + 
MINI LOISIRS - SENS - (86) 64.41.91 

- LASOBKOR YONNE - SENS (86) 64 51.96 + 


: DIXMA - SAINT-MAUR - 885 98 99 
` MICROTEK 9 - MONACO - (93) 30.67.67 + 
AVM. - ÉPINAL (29) 89.14 97 


B ou eres: 
Lo ын, 


OBLIGE 


Le deuxiéme d'une 

longue série de guide 
des logiciels. 

Plus d'un tiers de no: 

veautés. 


AU SOMMAIRE : 

— Une sélection de 416 
programmes en Anglais 
ou en Francais pour : 

APPLE - ATARI - COMMODORE 

V20 et C64 - EPSON HX 20 - 

ORIC 1 et ORIC ATMOS - IBM PC 

- SINCLAIR ZX81 et SPECTRUM 

TRS 80 - THOMSON TO 7 

HECTOR. 

— Les fiches techniques de т 
chaque programme сотрге- 
nant : 

La description précise du pro- 

gramme. 

Son prix moyen constaté. 

Sa compatibilité avec tel ou tel 

micro. 

— En plus vous trouverez 

Des conseils pour choisir et acheter 

le programme que vous cherchez. 

Des index pour trouver facilement 

ce que vous cherchez. 


EN VENTE 15 F CHEZ VOTRE 


DISTRIBUTEUR OU 15 F + 5 F = 

DE PORT EN RENVOYANT LE || 
COUPON CI-DESSOUS. 

LA HAUTE FIABILITE 


BON DE COMMANDE A RENVOYER A SPID - 39, RUE V-MASSÉ - 75009 PARIS 


Je désire recevoir le "GUIDE DES LOGICIELS" Printemps 1984 
Je joins 90 F en chèque (15 F+ 5 F de port) en règlement. 


Nom ... 
Adresse . ses 
Code et ville ..... 


SUPER COBRA" 


Votre mission : “Anéantir 
l'ennemi”. Qui est-t-il? Où se 
trouve-t-il? Personne ne le sait. 
Leseul moyen de l'atteindre : 

l'hélicoptère. Mais il fait nuit Vous 

devez traverser des villes et des 
tunnels. Et si vous ne vous écrasez pas, vous risquez d'être 
abattu par l'armée ennemie. Alors ayez l'œil! 


Compatible avec les systèmes : Atari™ VCS"", Intellivision™, Vidéopac?, CBS/Coleco", 
Atari! Ordinateur familial, Jopac™, Brandt! 


TUTANKHAM " 
Découvrez le trésor millénaire 
des pharaons. Pas si simple! 
Serpents venimeux, chauves-souris, 
esprits, tous sont unis pour vous 
empécher d'y parvenir. Pour les 
vaincre, vous n avez que votre 


pistolet laser. Courage ! 


Compatible avec les systèmes : Atari?! VCS™, Intellivision™, Vidéopac™, CBS/Coleco'", 
Atari Ordinateur familial, Jopac™, Brandt?" 


POPEYE* 


Vous étes Popeye et vous aimez 
Olive. Votre seul désir, attraper 
tous les cœurs et les mots d'amour 
qu'elle lance, et la rejoindre. Mais 
tout vous en empéche. Des trappes, 
des échelles et l'éternel Brutus! 

Ia seule solution : avalez une boite d'épinards. Attention à 
Brutus! Battez-vous! 


Compatible avec les systèmes : Atari™ VCS™, Intellivision™, Vidéopac?, CBS/Coleco®*, 
Atari? Ordinateur familial, Jopac™, Brandt™ 


. BERT ° 
QE nouveau nom, Q. BERT. 
Vous sautez joyeusement sur les 
blocs d’une pyramide jusqu’à ce 
qu'ils aient tous la même couleur. 
Mais attention, dangers! Hargne 
> de vos ennemis, Slick, Sam et 
Coilly le serpent. En cas de panique, échappez- vous en sou- 
coupe. Restez calme! 


les systèmes : Atari"! VCS™, Intellivision 
eur familial, Jopac™, Brandt" 


ЕКОССЕК" 

Vous êtes responsable de la vie de 
Frogger la grenouille. Non seule- 
ment elle doit traverser une auto- 
route à 5 voies mais encore une 
rivière grouillante de crocodiles, de 
tortues ou de serpents, tous gros 
mangeurs de grenouilles. Aidez-la! 

Compatible avec les systèmes : Atari?! VES, Intellivision™, Vidéopac™, CBS/Coleco!" 


Atari"! Ordinateur familial, Jopac™, Brandt" 


JEUX VIDEO 
Ils détestent vous laisser gagner. 


idéopac™, CBS/Coleco™, 


COMPATIBLES 
AVEC LES PRINCIPAUX 
SYSTÈMES 


BAZAINE/DFS 


